ETO Development Tools 1

home *** CD-ROM | disk | FTP | other *** search
/ ETO Development Tools 1 / ETO Development Tools 1.iso / Essentials / Developer Essentials Jul 90 / DTS Sample Code / Macintosh Sample Code / Monthly Releases (Compressed) / MacDTS.Sample.Code.90.05.sit / SC.023.FracApp 2.0 / GoFigger.a < prev next >
MacBinary | 1990-05-01 | 15.0 KB | [TEXT/MPS ]
open in:
MacOS 8.1 extracted |
Win98 extracted |
DOS extracted
browse contents |
view JSON data |
view as text

This file was processed as: MacBinary (archive/macBinary).
Confidence	Program	Detection	Match Type	Support
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	System V 64-bit library `(executable/systemV64BitLibrary)`	ext	Unsupported
`1%`	dexvert	COFF Library `(other/coffLibrary)`	ext	Unsupported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, inited, Tue May 1 12:00:00 1990, modified Tue May 1 12:00:00 1990, creator 'MPS ', type ASCII, 14517 bytes "GoFigger.a" Generic INItialization configuration [long], at 0x3935 562 bytes resource Generic INItialization configuration [long]	default (weak)
`99%`	file	data	default
`74%`	TrID	Macintosh plain text (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	siegfried	fmt/1762 MacBinary (II)	default
`100%`	lsar	MacBinary	default
id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[MPS ]`
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0a 47 6f 46 69 67 67 | 65 72 2e 61 00 00 00 00 |..GoFigg|er.a....|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 50 53 | 20 01 00 00 00 00 00 00 |.TEXTMPS| .......|
|00000050| 00 00 00 00 00 38 b5 00 | 00 02 32 a2 63 63 00 a2 |.....8..|..2.cc..|
|00000060| 63 63 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |cc......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 58 94 00 00 |........|....X...|
|00000080| 3b 20 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |; ======|========|
|00000090| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000000a0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000000b0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000000c0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000000d0| 3d 3d 3d 3d 3d 3d 0d 3b | 0d 3b 09 50 72 6f 67 72 |======.;|.;.Progr|
|000000e0| 61 6d 3a 09 46 72 61 63 | 41 70 70 20 32 2e 30 0d |am:.Frac|App 2.0.|
|000000f0| 3b 09 46 69 6c 65 3a 09 | 09 47 6f 46 69 67 67 65 |;.File:.|.GoFigge|
|00000100| 72 2e 61 0d 3b 0d 3b 09 | 62 79 20 4b 65 69 74 68 |r.a.;.;.|by Keith|
|00000110| 20 52 6f 6c 6c 69 6e 20 | 26 20 42 6f 33 62 20 4a | Rollin |& Bo3b J|
|00000120| 6f 68 6e 73 6f 6e 0d 3b | 09 6f 66 20 41 70 70 6c |ohnson.;|.of Appl|
|00000130| 65 20 4d 61 63 69 6e 74 | 6f 73 68 20 44 65 76 65 |e Macint|osh Deve|
|00000140| 6c 6f 70 65 72 20 54 65 | 63 68 6e 69 63 61 6c 20 |loper Te|chnical |
|00000150| 53 75 70 70 6f 72 74 0d | 3b 0d 3b 09 43 6f 70 79 |Support.|;.;.Copy|
|00000160| 72 69 67 68 74 20 a9 20 | 31 39 38 38 2d 31 39 39 |right . |1988-199|
|00000170| 30 20 41 70 70 6c 65 20 | 43 6f 6d 70 75 74 65 72 |0 Apple |Computer|
|00000180| 2c 20 49 6e 63 2e 0d 3b | 09 41 6c 6c 20 72 69 67 |, Inc..;|.All rig|
|00000190| 68 74 73 20 72 65 73 65 | 72 76 65 64 2e 0d 3b 0d |hts rese|rved..;.|
|000001a0| 3b 20 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |; ======|========|
|000001b0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000001c0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000001d0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000001e0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000001f0| 3d 3d 3d 3d 3d 3d 0d 3b | 0d 3b 09 41 73 73 65 6d |======.;|.;.Assem|
|00000200| 62 6c 79 20 73 75 70 70 | 6f 72 74 20 72 6f 75 74 |bly supp|ort rout|
|00000210| 69 6e 65 73 20 66 6f 72 | 20 46 72 61 63 41 70 70 |ines for| FracApp|
|00000220| 20 32 2e 30 0d 3b 0d 3b | 09 49 6e 73 54 69 6d 65 | 2.0.;.;|.InsTime|
|00000230| 4e 6f 44 72 69 66 74 20 | 2d 20 49 6e 73 74 61 6c |NoDrift |- Instal|
|00000240| 6c 73 20 61 20 54 69 6d | 65 20 4d 61 6e 61 67 65 |ls a Tim|e Manage|
|00000250| 72 20 54 61 73 6b 2c 20 | 75 73 69 6e 67 20 45 78 |r Task, |using Ex|
|00000260| 74 65 6e 64 65 64 20 54 | 69 6d 65 20 4d 61 6e 61 |tended T|ime Mana|
|00000270| 67 65 72 20 69 66 0d 3b | 09 09 09 70 72 65 73 65 |ger if.;|...prese|
|00000280| 6e 74 0d 3b 09 54 69 6d | 65 43 6f 75 6e 74 65 72 |nt.;.Tim|eCounter|
|00000290| 54 68 61 74 46 65 74 63 | 68 65 73 49 74 73 4f 77 |ThatFetc|hesItsOw|
|000002a0| 6e 54 61 73 6b 50 74 72 | 20 2d 20 54 61 73 6b 20 |nTaskPtr| - Task |
|000002b0| 74 68 61 74 20 67 65 74 | 73 20 63 61 6c 6c 65 64 |that get|s called|
|000002c0| 20 6f 6e 20 53 79 73 74 | 65 6d 73 20 65 61 72 6c | on Syst|ems earl|
|000002d0| 69 65 72 0d 3b 09 09 09 | 74 68 61 6e 20 36 2e 30 |ier.;...|than 6.0|
|000002e0| 2e 32 0d 3b 09 54 69 6d | 65 43 6f 75 6e 74 65 72 |.2.;.Tim|eCounter|
|000002f0| 20 2d 20 54 61 73 6b 20 | 74 68 61 74 20 67 65 74 | - Task |that get|
|00000300| 73 20 63 61 6c 6c 65 64 | 20 6f 6e 20 53 79 73 74 |s called| on Syst|
|00000310| 65 6d 20 36 2e 30 2e 32 | 20 6f 72 20 6c 61 74 65 |em 6.0.2| or late|
|00000320| 72 0d 3b 09 49 6e 69 74 | 43 6f 75 6e 74 65 72 20 |r.;.Init|Counter |
|00000330| 2d 20 43 61 6c 6c 65 64 | 20 74 6f 20 69 6e 69 74 |- Called| to init|
|00000340| 69 61 6c 69 7a 65 20 74 | 68 65 20 54 69 6d 65 43 |ialize t|he TimeC|
|00000350| 6f 75 6e 74 65 72 54 68 | 61 74 46 65 74 63 68 65 |ounterTh|atFetche|
|00000360| 73 49 74 73 4f 77 6e 54 | 61 73 6b 50 74 72 20 77 |sItsOwnT|askPtr w|
|00000370| 69 74 68 0d 3b 09 09 09 | 61 20 72 65 66 65 72 65 |ith.;...|a refere|
|00000380| 6e 63 65 20 74 6f 20 6f | 75 72 20 67 6c 6f 62 61 |nce to o|ur globa|
|00000390| 6c 20 76 61 72 69 61 62 | 6c 65 73 2e 0d 3b 09 47 |l variab|les..;.G|
|000003a0| 6f 46 69 67 67 65 72 20 | 2d 20 47 69 76 65 6e 20 |oFigger |- Given |
|000003b0| 61 20 70 6f 69 6e 74 2c | 20 61 20 72 61 6e 67 65 |a point,| a range|
|000003c0| 2c 20 61 6e 64 20 61 20 | 64 77 65 6c 6c 20 74 68 |, and a |dwell th|
|000003d0| 72 65 73 68 68 6f 6c 64 | 2c 20 72 65 74 75 72 6e |reshhold|, return|
|000003e0| 73 20 74 68 65 20 6e 75 | 6d 62 65 72 20 6f 66 0d |s the nu|mber of.|
|000003f0| 3b 09 09 09 69 74 65 72 | 61 74 69 6f 6e 73 20 74 |;...iter|ations t|
|00000400| 6f 20 67 6f 20 62 65 79 | 6f 6e 64 20 74 68 65 20 |o go bey|ond the |
|00000410| 72 61 6e 67 65 2e 0d 3b | 0d 3b 20 3d 3d 3d 3d 3d |range..;|.; =====|
|00000420| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000430| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000440| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000450| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000460| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 0d |========|=======.|
|00000470| 0d 09 09 09 09 4d 43 36 | 38 38 38 31 0d 09 09 09 |.....MC6|8881....|
|00000480| 69 66 20 71 4e 65 65 64 | 73 4d 43 36 38 30 32 30 |if qNeed|sMC68020|
|00000490| 20 74 68 65 6e 0d 09 09 | 09 09 4d 41 43 48 49 4e | then...|..MACHIN|
|000004a0| 45 20 4d 43 36 38 30 32 | 30 0d 09 09 09 65 6c 73 |E MC6802|0....els|
|000004b0| 65 69 66 20 71 4e 65 65 | 64 73 4d 43 36 38 30 33 |eif qNee|dsMC6803|
|000004c0| 30 20 74 68 65 6e 0d 09 | 09 09 09 4d 41 43 48 49 |0 then..|...MACHI|
|000004d0| 4e 45 20 4d 43 36 38 30 | 33 30 0d 09 09 09 65 6e |NE MC680|30....en|
|000004e0| 64 69 66 0d 0d 09 09 09 | 09 49 4e 43 4c 55 44 45 |dif.....|.INCLUDE|
|000004f0| 09 27 54 72 61 70 73 2e | 61 27 0d 0d 0d 3b 20 3d |.'Traps.|a'...; =|
|00000500| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000510| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000520| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000530| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000540| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000550| 3d 3d 3d 0d 3b 0d 3b 20 | 50 52 4f 43 45 44 55 52 |===.;.; |PROCEDUR|
|00000560| 45 20 49 6e 73 54 69 6d | 65 4e 6f 44 72 69 66 74 |E InsTim|eNoDrift|
|00000570| 28 74 61 73 6b 52 65 63 | 50 74 72 3a 54 4d 54 61 |(taskRec|Ptr:TMTa|
|00000580| 73 6b 50 74 72 29 3b 0d | 3b 0d 3b 09 49 6e 73 74 |skPtr);.|;.;.Inst|
|00000590| 61 6c 6c 20 61 20 54 69 | 6d 65 20 4d 61 6e 61 67 |all a Ti|me Manag|
|000005a0| 65 72 20 74 61 73 6b 2e | 20 54 68 69 73 20 69 73 |er task.| This is|
|000005b0| 20 61 20 63 6f 70 79 20 | 6f 66 20 74 68 65 20 67 | a copy |of the g|
|000005c0| 6c 75 65 20 74 68 61 74 | 20 63 6f 6d 65 73 20 77 |lue that| comes w|
|000005d0| 69 74 68 20 4d 50 57 20 | 66 6f 72 0d 3b 09 70 65 |ith MPW |for.;.pe|
|000005e0| 72 66 6f 72 6d 69 6e 67 | 20 73 75 63 68 20 61 20 |rforming| such a |
|000005f0| 74 61 73 6b 2c 20 65 78 | 63 65 70 74 20 74 68 61 |task, ex|cept tha|
|00000600| 74 20 77 65 20 75 73 65 | 20 54 72 61 70 20 24 41 |t we use| Trap $A|
|00000610| 34 35 38 20 69 6e 73 74 | 65 61 64 20 6f 66 20 24 |458 inst|ead of $|
|00000620| 41 30 35 38 2e 20 54 68 | 69 73 20 67 65 74 73 0d |A058. Th|is gets.|
|00000630| 3b 09 75 73 20 74 6f 20 | 74 68 65 20 73 61 6d 65 |;.us to |the same|
|00000640| 20 70 6c 61 63 65 20 69 | 6e 20 52 4f 4d 2c 20 62 | place i|n ROM, b|
|00000650| 75 74 20 74 68 65 20 66 | 61 63 74 20 74 68 61 74 |ut the f|act that|
|00000660| 20 62 69 74 20 39 20 69 | 73 20 73 65 74 20 6d 65 | bit 9 i|s set me|
|00000670| 61 6e 73 20 73 6f 6d 65 | 74 68 69 6e 67 20 74 6f |ans some|thing to|
|00000680| 0d 3b 09 74 68 65 20 65 | 78 74 65 6e 64 65 64 20 |.;.the e|xtended |
|00000690| 54 69 6d 65 20 4d 61 6e | 61 67 65 72 20 69 6e 20 |Time Man|ager in |
|000006a0| 53 79 73 74 65 6d 20 37 | 2e 30 3b 20 69 74 20 69 |System 7|.0; it i|
|000006b0| 73 20 68 61 72 6d 6c 65 | 73 73 20 66 6f 72 20 65 |s harmle|ss for e|
|000006c0| 61 72 6c 69 65 72 20 73 | 79 73 74 65 6d 73 2e 20 |arlier s|ystems. |
|000006d0| 53 65 65 0d 3b 09 49 6e | 73 69 64 65 20 6d 61 63 |See.;.In|side mac|
|000006e0| 2c 20 70 61 67 65 20 49 | 2d 38 39 20 74 6f 20 73 |, page I|-89 to s|
|000006f0| 65 65 20 74 68 65 20 66 | 6f 72 6d 61 74 20 6f 66 |ee the f|ormat of|
|00000700| 20 74 68 65 20 74 72 61 | 70 20 77 6f 72 64 20 61 | the tra|p word a|
|00000710| 6e 64 20 77 68 61 74 20 | 62 69 74 20 39 20 6d 65 |nd what |bit 9 me|
|00000720| 61 6e 73 20 66 6f 72 0d | 3b 09 4f 70 65 72 61 74 |ans for.|;.Operat|
|00000730| 69 6e 67 20 53 79 73 74 | 65 6d 20 54 72 61 70 73 |ing Syst|em Traps|
|00000740| 2e 0d 3b 0d 3b 09 53 6f | 20 77 68 61 74 20 64 6f |..;.;.So| what do|
|00000750| 65 73 20 73 65 74 74 69 | 6e 67 20 62 69 74 20 39 |es setti|ng bit 9|
|00000760| 20 6d 65 61 6e 3f 20 4f | 6e 20 73 79 73 74 65 6d | mean? O|n system|
|00000770| 73 20 74 68 61 74 20 73 | 75 70 70 6f 72 74 20 69 |s that s|upport i|
|00000780| 74 2c 20 69 74 20 6d 65 | 61 6e 73 20 22 6e 6f 2d |t, it me|ans "no-|
|00000790| 64 72 69 66 74 22 0d 3b | 09 6d 6f 64 65 2e 20 54 |drift".;|.mode. T|
|000007a0| 68 69 73 20 6d 65 61 6e | 73 20 74 68 61 74 20 74 |his mean|s that t|
|000007b0| 68 65 20 54 69 6d 65 20 | 4d 61 6e 61 67 65 72 20 |he Time |Manager |
|000007c0| 61 63 63 6f 75 6e 74 73 | 20 66 6f 72 20 74 68 65 |accounts| for the|
|000007d0| 20 6f 76 65 72 68 65 61 | 64 20 69 6e 76 6f 6c 76 | overhea|d involv|
|000007e0| 65 64 20 77 69 74 68 0d | 3b 09 6d 61 6e 61 67 69 |ed with.|;.managi|
|000007f0| 6e 67 20 74 61 73 6b 73 | 2c 20 61 6e 64 20 74 68 |ng tasks|, and th|
|00000800| 65 20 74 69 6d 65 20 69 | 74 20 74 61 6b 65 73 20 |e time i|t takes |
|00000810| 66 6f 72 20 79 6f 75 72 | 20 74 61 73 6b 20 70 72 |for your| task pr|
|00000820| 6f 63 65 64 75 72 65 20 | 74 6f 20 65 78 65 63 75 |ocedure |to execu|
|00000830| 74 65 2e 20 59 6f 75 72 | 0d 3b 09 74 61 73 6b 20 |te. Your|.;.task |
|00000840| 77 69 6c 6c 20 62 65 20 | 63 61 6c 6c 65 64 20 77 |will be |called w|
|00000850| 69 74 68 20 74 68 65 20 | 66 72 65 71 75 65 6e 63 |ith the |frequenc|
|00000860| 79 20 74 68 61 74 20 79 | 6f 75 20 73 70 65 63 69 |y that y|ou speci|
|00000870| 66 69 65 64 2c 20 72 61 | 74 68 65 72 20 74 68 61 |fied, ra|ther tha|
|00000880| 6e 20 77 69 74 68 20 61 | 6e 0d 3b 09 69 6e 74 65 |n with a|n.;.inte|
|00000890| 72 76 61 6c 20 6f 66 20 | 3c 73 70 65 63 69 66 69 |rval of |<specifi|
|000008a0| 65 64 20 70 65 72 69 6f | 64 3e 20 2b 20 3c 54 69 |ed perio|d> + <Ti|
|000008b0| 6d 65 20 4d 61 6e 61 67 | 65 72 20 4f 76 65 72 68 |me Manag|er Overh|
|000008c0| 65 61 64 3e 20 2b 20 3c | 54 61 73 6b 20 65 78 65 |ead> + <|Task exe|
|000008d0| 63 75 74 69 6f 6e 20 74 | 69 6d 65 3e 2e 0d 3b 09 |cution t|ime>..;.|
|000008e0| 42 61 73 69 63 61 6c 6c | 79 2c 20 77 68 61 74 20 |Basicall|y, what |
|000008f0| 49 20 6d 65 61 6e 20 69 | 73 20 74 68 61 74 20 69 |I mean i|s that i|
|00000900| 74 27 73 20 6d 6f 72 65 | 20 61 63 63 75 72 61 74 |t's more| accurat|
|00000910| 65 2e 0d 3b 0d 3b 20 3d | 3d 3d 3d 3d 3d 3d 3d 3d |e..;.; =|========|
|00000920| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000930| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000940| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000950| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000960| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 0d 0d 5f 49 6e |========|===.._In|
|00000970| 73 58 54 69 6d 65 54 72 | 61 70 09 4f 50 57 4f 52 |sXTimeTr|ap.OPWOR|
|00000980| 44 09 09 24 41 34 35 38 | 0d 0d 09 09 09 09 53 45 |D..$A458|......SE|
|00000990| 47 09 09 27 41 49 6e 69 | 74 27 0d 49 4e 53 54 49 |G..'AIni|t'.INSTI|
|000009a0| 4d 45 4e 4f 44 52 49 46 | 54 09 50 52 4f 43 20 09 |MENODRIF|T.PROC .|
|000009b0| 45 58 50 4f 52 54 0d 0d | 53 74 61 63 6b 46 72 61 |EXPORT..|StackFra|
|000009c0| 6d 65 09 09 52 45 43 4f | 52 44 09 7b 52 65 74 41 |me..RECO|RD.{RetA|
|000009d0| 64 64 72 7d 2c 44 45 43 | 52 09 09 3b 20 62 75 69 |ddr},DEC|R..; bui|
|000009e0| 6c 64 20 61 20 73 74 61 | 63 6b 20 66 72 61 6d 65 |ld a sta|ck frame|
|000009f0| 20 72 65 63 6f 72 64 0d | 74 61 73 6b 52 65 63 50 | record.|taskRecP|
|00000a00| 74 72 09 09 44 53 2e 4c | 09 31 09 09 09 09 09 3b |tr..DS.L|.1.....;|
|00000a10| 20 70 6f 69 6e 74 65 72 | 20 74 61 73 6b 20 72 65 | pointer| task re|
|00000a20| 63 6f 72 64 20 77 65 20 | 61 72 65 20 75 73 69 6e |cord we |are usin|
|00000a30| 67 0d 50 61 72 61 6d 53 | 69 7a 65 09 09 45 51 55 |g.ParamS|ize..EQU|
|00000a40| 09 09 53 74 61 63 6b 46 | 72 61 6d 65 2d 2a 09 09 |..StackF|rame-*..|
|00000a50| 3b 20 73 69 7a 65 20 6f | 66 20 61 6c 6c 20 74 68 |; size o|f all th|
|00000a60| 65 20 70 61 73 73 65 64 | 20 70 61 72 61 6d 65 74 |e passed| paramet|
|00000a70| 65 72 73 0d 52 65 74 41 | 64 64 72 20 09 09 44 53 |ers.RetA|ddr ..DS|
|00000a80| 2e 4c 09 31 09 09 09 09 | 09 3b 20 70 6c 61 63 65 |.L.1....|.; place|
|00000a90| 20 68 6f 6c 64 65 72 20 | 66 6f 72 20 72 65 74 75 | holder |for retu|
|00000aa0| 72 6e 20 61 64 64 72 65 | 73 73 0d 09 09 09 09 45 |rn addre|ss.....E|
|00000ab0| 4e 44 52 0d 0d 09 09 09 | 09 57 49 54 48 09 53 74 |NDR.....|.WITH.St|
|00000ac0| 61 63 6b 46 72 61 6d 65 | 0d 0d 09 09 09 09 4d 4f |ackFrame|......MO|
|00000ad0| 56 45 41 2e 4c 09 74 61 | 73 6b 52 65 63 50 74 72 |VEA.L.ta|skRecPtr|
|00000ae0| 28 41 37 29 2c 41 30 09 | 3b 20 67 65 74 20 74 68 |(A7),A0.|; get th|
|00000af0| 65 20 72 65 63 6f 72 64 | 20 70 6f 69 6e 74 65 72 |e record| pointer|
|00000b00| 0d 09 09 09 09 5f 49 6e | 73 58 54 69 6d 65 54 72 |....._In|sXTimeTr|
|00000b10| 61 70 09 09 09 09 3b 20 | 49 6e 73 74 61 6c 6c 20 |ap....; |Install |
|00000b20| 74 68 65 20 74 61 73 6b | 0d 0d 09 09 09 69 66 20 |the task|.....if |
|00000b30| 71 4e 65 65 64 73 4d 43 | 36 38 30 32 30 20 7c 20 |qNeedsMC|68020 | |
|00000b40| 71 4e 65 65 64 73 4d 43 | 36 38 30 33 30 20 74 68 |qNeedsMC|68030 th|
|00000b50| 65 6e 0d 0d 09 09 09 09 | 52 54 44 09 09 23 50 61 |en......|RTD..#Pa|
|00000b60| 72 61 6d 53 69 7a 65 0d | 0d 09 09 09 65 6c 73 65 |ramSize.|....else|
|00000b70| 0d 0d 09 09 09 09 4d 4f | 56 45 41 2e 4c 09 28 41 |......MO|VEA.L.(A|
|00000b80| 37 29 2b 2c 41 30 09 09 | 09 3b 20 70 6f 70 20 74 |7)+,A0..|.; pop t|
|00000b90| 68 65 20 72 65 74 75 72 | 6e 20 61 64 64 72 65 73 |he retur|n addres|
|00000ba0| 73 0d 09 09 09 09 41 44 | 44 09 09 23 50 61 72 61 |s.....AD|D..#Para|
|00000bb0| 6d 53 69 7a 65 2c 41 37 | 09 09 3b 20 74 72 61 73 |mSize,A7|..; tras|
|00000bc0| 68 20 74 68 65 20 70 61 | 72 61 6d 65 74 65 72 0d |h the pa|rameter.|
|00000bd0| 09 09 09 09 4a 4d 50 09 | 09 28 41 30 29 09 09 09 |....JMP.|.(A0)...|
|00000be0| 09 3b 20 72 65 74 75 72 | 6e 0d 0d 09 09 09 65 6e |.; retur|n.....en|
|00000bf0| 64 69 66 0d 0d 09 09 09 | 09 45 4e 44 50 0d 0d 3b |dif.....|.ENDP..;|
|00000c00| 20 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d | =======|========|
|00000c10| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000c20| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000c30| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000c40| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000c50| 3d 3d 3d 3d 3d 0d 3b 0d | 3b 20 49 6e 69 74 43 6f |=====.;.|; InitCo|
|00000c60| 75 6e 74 65 72 0d 3b 09 | 43 61 6c 6c 65 64 20 77 |unter.;.|Called w|
|00000c70| 68 65 6e 20 77 65 20 61 | 72 65 6e 27 74 20 72 75 |hen we a|ren't ru|
|00000c80| 6e 6e 69 6e 67 20 75 6e | 64 65 72 20 53 79 73 74 |nning un|der Syst|
|00000c90| 65 6d 20 36 2e 30 2e 32 | 20 6f 72 20 6c 61 74 65 |em 6.0.2| or late|
|00000ca0| 72 2e 20 55 6e 64 65 72 | 20 74 68 6f 73 65 20 6e |r. Under| those n|
|00000cb0| 65 77 65 72 0d 3b 09 73 | 79 73 74 65 6d 73 2c 20 |ewer.;.s|ystems, |
|00000cc0| 74 68 65 20 54 69 6d 65 | 20 4d 61 6e 61 67 65 72 |the Time| Manager|
|00000cd0| 20 63 61 6c 6c 73 20 6f | 75 72 20 74 61 73 6b 20 | calls o|ur task |
|00000ce0| 70 72 6f 63 65 64 75 72 | 65 20 77 69 74 68 20 41 |procedur|e with A|
|00000cf0| 31 20 68 6f 6c 64 69 6e | 67 20 61 20 70 6f 69 6e |1 holdin|g a poin|
|00000d00| 74 65 72 20 74 6f 0d 3b | 09 6f 75 72 20 74 61 73 |ter to.;|.our tas|
|00000d10| 6b 20 72 65 63 6f 72 64 | 2e 20 54 68 69 73 20 67 |k record|. This g|
|00000d20| 69 76 65 73 20 75 73 20 | 74 68 65 20 66 6f 6f 74 |ives us |the foot|
|00000d30| 68 6f 6c 64 20 77 65 20 | 6e 65 65 64 20 74 6f 20 |hold we |need to |
|00000d40| 67 65 74 20 61 74 20 6f | 75 72 20 67 6c 6f 62 61 |get at o|ur globa|
|00000d50| 6c 0d 3b 09 76 61 72 69 | 61 62 6c 65 73 2e 20 46 |l.;.vari|ables. F|
|00000d60| 6f 72 20 69 6e 73 74 61 | 6e 63 65 2c 20 6a 75 73 |or insta|nce, jus|
|00000d70| 74 20 70 72 65 63 65 65 | 64 69 6e 67 20 6d 79 20 |t precee|ding my |
|00000d80| 74 61 73 6b 20 72 65 63 | 6f 72 64 2c 20 49 20 68 |task rec|ord, I h|
|00000d90| 61 76 65 20 61 20 76 61 | 72 69 61 62 6c 65 20 74 |ave a va|riable t|
|00000da0| 68 61 74 0d 3b 09 68 6f | 6c 64 73 20 6d 79 20 41 |hat.;.ho|lds my A|
|00000db0| 35 20 76 61 6c 75 65 2e | 20 4f 6e 63 65 20 49 20 |5 value.| Once I |
|00000dc0| 68 61 76 65 20 74 68 69 | 73 2c 20 49 20 63 61 6e |have thi|s, I can|
|00000dd0| 20 61 63 63 65 73 73 20 | 61 6e 79 20 6f 66 20 6d | access |any of m|
|00000de0| 79 20 67 6c 6f 62 61 6c | 20 76 61 72 69 61 62 6c |y global| variabl|
|00000df0| 65 73 2e 0d 3b 09 54 68 | 65 20 70 72 6f 62 6c 65 |es..;.Th|e proble|
|00000e00| 6d 20 69 73 20 74 68 61 | 74 20 77 65 20 64 6f 6e |m is tha|t we don|
|00000e10| 27 74 20 67 65 74 20 74 | 68 69 73 20 70 6f 69 6e |'t get t|his poin|
|00000e20| 74 65 72 20 69 6e 20 41 | 31 20 6f 6e 20 6f 6c 64 |ter in A|1 on old|
|00000e30| 65 72 20 73 79 73 74 65 | 6d 73 2e 20 54 68 65 72 |er syste|ms. Ther|
|00000e40| 65 66 6f 72 65 2c 0d 3b | 09 49 20 63 61 6c 6c 20 |efore,.;|.I call |
|00000e50| 49 6e 69 74 43 6f 75 6e | 74 65 72 20 77 69 74 68 |InitCoun|ter with|
|00000e60| 20 77 69 74 68 20 74 68 | 61 74 20 70 6f 69 6e 74 | with th|at point|
|00000e70| 65 72 2c 20 61 6e 64 20 | 73 61 76 65 20 69 74 20 |er, and |save it |
|00000e80| 6c 6f 63 61 6c 6c 79 2e | 0d 3b 0d 3b 20 54 69 6d |locally.|.;.; Tim|
|00000e90| 65 43 6f 75 6e 74 65 72 | 54 68 61 74 46 65 74 63 |eCounter|ThatFetc|
|00000ea0| 68 65 73 49 74 73 4f 77 | 6e 54 61 73 6b 50 74 72 |hesItsOw|nTaskPtr|
|00000eb0| 0d 3b 09 47 65 74 73 20 | 74 68 65 20 70 6f 69 6e |.;.Gets |the poin|
|00000ec0| 74 65 72 20 74 6f 20 6d | 79 20 74 69 6d 65 20 6d |ter to m|y time m|
|00000ed0| 61 6e 61 67 65 72 20 74 | 61 73 6b 20 72 65 63 6f |anager t|ask reco|
|00000ee0| 72 64 2c 20 61 6e 64 20 | 66 61 6c 6c 73 20 74 6f |rd, and |falls to|
|00000ef0| 20 54 69 6d 65 43 6f 75 | 6e 74 65 72 2e 20 54 68 | TimeCou|nter. Th|
|00000f00| 69 73 0d 3b 09 72 6f 75 | 74 69 6e 65 20 67 65 74 |is.;.rou|tine get|
|00000f10| 73 20 69 6e 73 74 61 6c | 6c 65 64 20 6f 6e 20 6f |s instal|led on o|
|00000f20| 6c 64 65 72 20 73 79 73 | 74 65 6d 73 20 74 68 61 |lder sys|tems tha|
|00000f30| 74 20 64 6f 6e 27 74 20 | 68 61 76 65 20 61 20 54 |t don't |have a T|
|00000f40| 69 6d 65 20 4d 61 6e 61 | 67 65 72 20 74 68 61 74 |ime Mana|ger that|
|00000f50| 0d 3b 09 70 61 73 73 65 | 73 20 74 6f 20 75 73 20 |.;.passe|s to us |
|00000f60| 61 20 70 6f 69 6e 74 65 | 72 20 74 6f 20 6f 75 72 |a pointe|r to our|
|00000f70| 20 74 61 73 6b 20 72 65 | 63 6f 72 64 20 69 6e 20 | task re|cord in |
|00000f80| 41 31 2e 20 49 6e 20 74 | 68 61 74 20 63 61 73 65 |A1. In t|hat case|
|00000f90| 2c 20 77 65 20 68 61 76 | 65 20 74 6f 0d 3b 09 72 |, we hav|e to.;.r|
|00000fa0| 65 6d 65 6d 62 65 72 20 | 74 68 65 20 70 6f 69 6e |emember |the poin|
|00000fb0| 74 65 72 20 6f 75 72 73 | 65 6c 76 65 73 2e 20 57 |ter ours|elves. W|
|00000fc0| 65 20 63 61 6e 27 74 20 | 73 61 76 65 20 69 74 20 |e can't |save it |
|00000fd0| 69 6e 20 61 20 67 6c 6f | 62 61 6c 2c 20 61 73 20 |in a glo|bal, as |
|00000fe0| 6f 75 72 20 74 69 6d 65 | 0d 3b 09 63 6f 75 6e 74 |our time|.;.count|
|00000ff0| 65 72 20 67 65 74 73 20 | 63 61 6c 6c 65 64 20 61 |er gets |called a|
|00001000| 74 20 69 6e 74 65 72 72 | 75 70 74 20 74 69 6d 65 |t interr|upt time|
|00001010| 2c 20 61 6e 64 20 74 68 | 65 72 65 20 69 73 20 6e |, and th|ere is n|
|00001020| 6f 20 67 75 61 72 61 6e | 74 65 65 20 74 68 61 74 |o guaran|tee that|
|00001030| 20 41 35 20 70 6f 69 6e | 74 73 0d 3b 09 74 6f 20 | A5 poin|ts.;.to |
|00001040| 6f 75 72 20 67 6c 6f 62 | 61 6c 73 2e 20 4e 65 69 |our glob|als. Nei|
|00001050| 74 68 65 72 20 69 73 20 | 74 68 65 72 65 20 61 20 |ther is |there a |
|00001060| 77 61 79 20 74 6f 20 66 | 69 6e 64 20 6f 75 74 20 |way to f|ind out |
|00001070| 77 68 61 74 20 41 35 20 | 73 68 6f 75 6c 64 20 62 |what A5 |should b|
|00001080| 65 20 73 65 74 20 74 6f | 2c 0d 3b 09 73 6f 20 77 |e set to|,.;.so w|
|00001090| 65 20 63 61 6e 27 74 20 | 6a 75 73 74 20 73 61 76 |e can't |just sav|
|000010a0| 65 20 41 35 2c 20 73 65 | 74 20 69 74 20 74 6f 20 |e A5, se|t it to |
|000010b0| 74 68 65 20 72 69 67 68 | 74 20 76 61 6c 75 65 2c |the righ|t value,|
|000010c0| 20 64 6f 20 6f 75 72 20 | 74 68 69 6e 67 2c 20 61 | do our |thing, a|
|000010d0| 6e 64 20 74 68 65 6e 0d | 3b 09 72 65 73 74 6f 72 |nd then.|;.restor|
|000010e0| 65 20 41 35 2e 20 54 68 | 65 20 6f 6e 6c 79 20 77 |e A5. Th|e only w|
|000010f0| 61 79 20 74 6f 20 72 65 | 6d 65 6d 62 65 72 20 6f |ay to re|member o|
|00001100| 75 72 20 74 61 73 6b 20 | 72 65 63 6f 72 64 20 70 |ur task |record p|
|00001110| 6f 69 6e 74 65 72 20 69 | 73 20 74 6f 20 73 61 76 |ointer i|s to sav|
|00001120| 65 20 69 74 0d 3b 09 6c | 6f 63 61 6c 6c 79 2c 20 |e it.;.l|ocally, |
|00001130| 61 6e 64 20 72 65 74 72 | 69 65 76 65 20 69 74 20 |and retr|ieve it |
|00001140| 77 69 74 68 20 50 43 20 | 72 65 6c 61 74 69 76 65 |with PC |relative|
|00001150| 20 61 64 64 72 65 73 73 | 69 6e 67 2e 0d 3b 0d 3b | address|ing..;.;|
|00001160| 20 54 69 6d 65 43 6f 75 | 6e 74 65 72 0d 3b 09 52 | TimeCou|nter.;.R|
|00001170| 65 74 72 69 65 76 65 73 | 20 6d 79 20 73 61 76 65 |etrieves| my save|
|00001180| 64 20 41 35 20 76 61 6c | 75 65 2c 20 67 65 74 73 |d A5 val|ue, gets|
|00001190| 20 61 20 72 65 66 65 72 | 65 6e 63 65 20 74 6f 20 | a refer|ence to |
|000011a0| 67 43 6f 75 6e 74 65 72 | 2c 20 61 6e 64 20 69 6e |gCounter|, and in|
|000011b0| 63 72 65 6d 65 6e 74 73 | 20 69 74 2e 0d 3b 09 54 |crements| it..;.T|
|000011c0| 68 69 73 20 77 61 79 2c | 20 67 43 6f 75 6e 74 65 |his way,| gCounte|
|000011d0| 72 20 69 73 20 6c 69 6b | 65 20 61 20 72 75 6e 6e |r is lik|e a runn|
|000011e0| 69 6e 67 20 73 74 6f 70 | 77 61 74 63 68 20 77 69 |ing stop|watch wi|
|000011f0| 74 68 20 6d 69 6c 6c 69 | 73 65 63 6f 6e 64 20 72 |th milli|second r|
|00001200| 65 73 6f 6c 75 74 69 6f | 6e 2e 0d 3b 09 57 68 65 |esolutio|n..;.Whe|
|00001210| 6e 65 76 65 72 20 49 20 | 6e 65 65 64 20 74 6f 20 |never I |need to |
|00001220| 74 69 6d 65 73 74 61 6d | 70 20 73 6f 6d 65 74 68 |timestam|p someth|
|00001230| 69 6e 67 2c 20 49 20 6a | 75 73 74 20 6c 6f 6f 6b |ing, I j|ust look|
|00001240| 20 61 74 20 67 43 6f 75 | 6e 74 65 72 2e 20 49 74 | at gCou|nter. It|
|00001250| 27 73 20 6b 69 6e 64 20 | 6f 66 0d 3b 09 6c 69 6b |'s kind |of.;.lik|
|00001260| 65 20 63 61 6c 6c 69 6e | 67 20 74 68 65 20 54 69 |e callin|g the Ti|
|00001270| 63 6b 73 20 73 79 73 74 | 65 6d 20 72 6f 75 74 69 |cks syst|em routi|
|00001280| 6e 65 2c 20 62 75 74 20 | 62 65 74 74 65 72 2e 20 |ne, but |better. |
|00001290| 54 69 63 6b 73 20 61 72 | 65 6e 27 74 20 67 6f 6f |Ticks ar|en't goo|
|000012a0| 64 20 65 6e 6f 75 67 68 | 0d 3b 09 62 65 63 61 75 |d enough|.;.becau|
|000012b0| 73 65 20 77 65 20 77 6f | 75 6c 64 20 6c 69 6b 65 |se we wo|uld like|
|000012c0| 20 74 6f 20 62 65 20 61 | 62 6c 65 20 74 6f 20 63 | to be a|ble to c|
|000012d0| 68 75 6e 6b 20 75 70 20 | 6f 75 72 20 6f 70 65 72 |hunk up |our oper|
|000012e0| 61 74 69 6f 6e 73 20 69 | 6e 74 6f 20 75 6e 69 74 |ations i|nto unit|
|000012f0| 73 20 73 6d 61 6c 6c 0d | 3b 09 65 6e 6f 75 67 68 |s small.|;.enough|
|00001300| 20 74 68 61 74 20 77 65 | 20 64 6f 6e 27 74 20 75 | that we| don't u|
|00001310| 70 73 65 74 20 74 68 65 | 20 75 73 65 72 2e 20 49 |pset the| user. I|
|00001320| 6e 20 6f 74 68 65 72 20 | 77 6f 72 64 73 2c 20 77 |n other |words, w|
|00001330| 65 20 77 61 6e 74 20 72 | 65 73 70 6f 6e 73 69 76 |e want r|esponsiv|
|00001340| 65 6e 65 73 73 0d 3b 09 | 74 6f 20 62 65 20 76 65 |eness.;.|to be ve|
|00001350| 72 79 20 68 69 67 68 2e | 20 57 69 74 68 20 74 68 |ry high.| With th|
|00001360| 69 73 20 67 6f 61 6c 2c | 20 77 65 20 77 6f 75 6c |is goal,| we woul|
|00001370| 64 6e 27 74 20 62 65 20 | 61 62 6c 65 20 74 6f 20 |dn't be |able to |
|00001380| 64 6f 20 74 69 6d 69 6e | 67 20 77 69 74 68 20 54 |do timin|g with T|
|00001390| 69 63 6b 73 0d 3b 09 61 | 73 20 77 65 20 77 6f 75 |icks.;.a|s we wou|
|000013a0| 6c 64 20 6c 69 6b 65 20 | 74 6f 20 62 65 20 69 6e |ld like |to be in|
|000013b0| 20 61 6e 64 20 6f 75 74 | 20 6f 66 20 6f 75 72 20 | and out| of our |
|000013c0| 63 61 6c 63 75 6c 61 74 | 69 6f 6e 20 72 6f 75 74 |calculat|ion rout|
|000013d0| 69 6e 65 73 20 69 6e 20 | 6c 65 73 73 20 74 68 61 |ines in |less tha|
|000013e0| 6e 0d 3b 09 31 2f 36 30 | 20 6f 66 20 61 20 73 65 |n.;.1/60| of a se|
|000013f0| 63 6f 6e 64 2e 20 53 6f | 20 77 65 20 75 73 65 20 |cond. So| we use |
|00001400| 61 20 74 69 6d 65 72 20 | 77 69 74 68 20 61 20 68 |a timer |with a h|
|00001410| 69 67 68 65 72 20 72 65 | 73 6f 6c 75 74 69 6f 6e |igher re|solution|
|00001420| 2c 20 69 2e 65 2e 2c 20 | 74 68 65 0d 3b 09 54 69 |, i.e., |the.;.Ti|
|00001430| 6d 65 20 4d 61 6e 61 67 | 65 72 2e 0d 3b 0d 3b 20 |me Manag|er..;.; |
|00001440| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001450| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001460| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001470| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001480| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001490| 3d 3d 3d 3d 0d 09 09 09 | 09 53 45 47 09 09 27 41 |====....|.SEG..'A|
|000014a0| 52 65 73 27 0d 49 4e 49 | 54 43 4f 55 4e 54 45 52 |Res'.INI|TCOUNTER|
|000014b0| 09 09 50 52 4f 43 20 09 | 45 58 50 4f 52 54 0d 09 |..PROC .|EXPORT..|
|000014c0| 09 09 09 49 4d 50 4f 52 | 54 09 47 43 4f 55 4e 54 |...IMPOR|T.GCOUNT|
|000014d0| 45 52 3a 44 61 74 61 0d | 09 09 09 09 45 58 50 4f |ER:Data.|....EXPO|
|000014e0| 52 54 09 54 49 4d 45 43 | 4f 55 4e 54 45 52 54 48 |RT.TIMEC|OUNTERTH|
|000014f0| 41 54 46 45 54 43 48 45 | 53 49 54 53 4f 57 4e 54 |ATFETCHE|SITSOWNT|
|00001500| 41 53 4b 50 54 52 0d 09 | 09 09 09 45 58 50 4f 52 |ASKPTR..|...EXPOR|
|00001510| 54 09 54 49 4d 45 43 4f | 55 4e 54 45 52 0d 0d 54 |T.TIMECO|UNTER..T|
|00001520| 69 6d 65 52 65 63 6f 72 | 64 09 09 52 45 43 4f 52 |imeRecor|d..RECOR|
|00001530| 44 09 7b 71 48 65 61 64 | 65 72 7d 0d 6d 79 41 35 |D.{qHead|er}.myA5|
|00001540| 09 09 09 44 53 2e 4c 09 | 31 09 09 09 09 09 3b 20 |...DS.L.|1.....; |
|00001550| 68 6f 6c 64 73 20 6f 75 | 72 20 41 35 20 66 6f 72 |holds ou|r A5 for|
|00001560| 20 6f 75 72 20 67 6c 6f | 62 61 6c 73 0d 71 48 65 | our glo|bals.qHe|
|00001570| 61 64 65 72 09 09 09 44 | 53 2e 42 09 36 09 09 09 |ader...D|S.B.6...|
|00001580| 09 09 3b 20 73 74 61 6e | 64 61 72 64 20 4f 53 20 |..; stan|dard OS |
|00001590| 71 75 65 75 65 20 68 65 | 61 64 65 72 0d 74 6d 41 |queue he|ader.tmA|
|000015a0| 64 64 72 09 09 09 44 53 | 2e 4c 09 31 09 09 09 09 |ddr...DS|.L.1....|
|000015b0| 09 3b 20 73 65 72 76 69 | 63 65 20 72 6f 75 74 69 |.; servi|ce routi|
|000015c0| 6e 65 20 5b 70 6f 69 6e | 74 65 72 5d 0d 74 6d 43 |ne [poin|ter].tmC|
|000015d0| 6f 75 6e 74 20 09 09 44 | 53 2e 4c 09 31 09 09 09 |ount ..D|S.L.1...|
|000015e0| 09 09 3b 20 74 69 6d 65 | 6f 75 74 20 63 6f 75 6e |..; time|out coun|
|000015f0| 74 20 5b 6c 6f 6e 67 5d | 0d 74 6d 51 53 69 7a 65 |t [long]|.tmQSize|
|00001600| 20 09 09 45 51 55 09 09 | 2a 0d 09 09 09 09 45 4e | ..EQU..|*.....EN|
|00001610| 44 52 0d 0d 09 09 09 09 | 57 49 54 48 20 54 69 6d |DR......|WITH Tim|
|00001620| 65 52 65 63 6f 72 64 0d | 0d 09 09 09 09 4d 4f 56 |eRecord.|.....MOV|
|00001630| 45 2e 4c 09 28 53 50 29 | 2b 2c 41 30 09 09 09 3b |E.L.(SP)|+,A0...;|
|00001640| 20 67 65 74 20 72 65 74 | 75 72 6e 20 61 64 64 72 | get ret|urn addr|
|00001650| 65 73 73 2c 20 73 61 76 | 65 20 69 6e 20 72 65 67 |ess, sav|e in reg|
|00001660| 69 73 74 65 72 20 41 30 | 0d 09 09 09 09 4c 45 41 |ister A0|.....LEA|
|00001670| 09 09 74 6d 54 61 73 6b | 50 74 72 2c 41 31 09 09 |..tmTask|Ptr,A1..|
|00001680| 3b 20 67 65 74 20 61 20 | 70 6f 69 6e 74 65 72 20 |; get a |pointer |
|00001690| 74 6f 20 6c 6f 63 61 6c | 20 73 74 6f 72 61 67 65 |to local| storage|
|000016a0| 0d 09 09 09 09 4d 4f 56 | 45 2e 4c 09 28 53 50 29 |.....MOV|E.L.(SP)|
|000016b0| 2b 2c 28 41 31 29 09 09 | 09 3b 20 70 75 74 20 70 |+,(A1)..|.; put p|
|000016c0| 6f 69 6e 74 65 72 20 74 | 6f 20 74 61 73 6b 20 72 |ointer t|o task r|
|000016d0| 65 63 6f 72 64 20 69 6e | 74 6f 20 6c 6f 63 61 6c |ecord in|to local|
|000016e0| 20 73 74 6f 72 61 67 65 | 0d 09 09 09 09 4a 4d 50 | storage|.....JMP|
|000016f0| 09 09 28 41 30 29 09 09 | 09 09 3b 20 72 65 74 75 |..(A0)..|..; retu|
|00001700| 72 6e 20 74 6f 20 63 61 | 6c 6c 65 72 0d 0d 54 49 |rn to ca|ller..TI|
|00001710| 4d 45 43 4f 55 4e 54 45 | 52 54 48 41 54 46 45 54 |MECOUNTE|RTHATFET|
|00001720| 43 48 45 53 49 54 53 4f | 57 4e 54 41 53 4b 50 54 |CHESITSO|WNTASKPT|
|00001730| 52 0d 09 09 09 09 4d 4f | 56 45 2e 4c 09 74 6d 54 |R.....MO|VE.L.tmT|
|00001740| 61 73 6b 50 74 72 28 50 | 43 29 2c 41 31 09 3b 20 |askPtr(P|C),A1.; |
|00001750| 72 65 74 72 69 65 76 65 | 20 74 68 65 20 70 6f 69 |retrieve| the poi|
|00001760| 6e 74 65 72 20 74 6f 20 | 74 61 73 6b 20 72 65 63 |nter to |task rec|
|00001770| 6f 72 64 0d 54 49 4d 45 | 43 4f 55 4e 54 45 52 0d |ord.TIME|COUNTER.|
|00001780| 09 09 09 09 4d 4f 56 45 | 2e 4c 09 6d 79 41 35 28 |....MOVE|.L.myA5(|
|00001790| 41 31 29 2c 41 30 09 09 | 09 3b 20 67 65 74 20 6f |A1),A0..|.; get o|
|000017a0| 75 72 20 41 35 20 76 61 | 6c 75 65 0d 09 09 09 09 |ur A5 va|lue.....|
|000017b0| 41 44 44 51 2e 4c 09 23 | 31 2c 47 43 4f 55 4e 54 |ADDQ.L.#|1,GCOUNT|
|000017c0| 45 52 28 41 30 29 09 09 | 3b 20 69 6e 63 72 65 6d |ER(A0)..|; increm|
|000017d0| 65 6e 74 20 6f 75 72 20 | 67 6c 6f 62 61 6c 20 67 |ent our |global g|
|000017e0| 43 6f 75 6e 74 65 72 0d | 09 09 09 09 4d 4f 56 45 |Counter.|....MOVE|
|000017f0| 2e 4c 09 41 31 2c 41 30 | 09 09 09 09 3b 20 70 75 |.L.A1,A0|....; pu|
|00001800| 74 20 74 61 73 6b 20 70 | 6f 69 6e 74 65 72 20 69 |t task p|ointer i|
|00001810| 6e 20 41 30 20 66 6f 72 | 20 50 72 69 6d 65 54 69 |n A0 for| PrimeTi|
|00001820| 6d 65 0d 09 09 09 09 4d | 4f 56 45 51 2e 4c 09 23 |me.....M|OVEQ.L.#|
|00001830| 31 2c 44 30 09 09 09 09 | 3b 20 77 61 6b 65 20 75 |1,D0....|; wake u|
|00001840| 70 20 74 69 6d 65 20 6f | 72 20 31 20 6d 69 6c 6c |p time o|r 1 mill|
|00001850| 69 73 65 63 6f 6e 64 0d | 09 09 09 09 5f 50 72 69 |isecond.|...._Pri|
|00001860| 6d 65 54 69 6d 65 09 09 | 09 09 09 3b 20 72 65 2d |meTime..|...; re-|
|00001870| 69 6e 73 74 61 6c 6c 20 | 6f 75 72 73 65 6c 76 65 |install |ourselve|
|00001880| 73 0d 09 09 09 09 52 54 | 53 0d 0d 74 6d 54 61 73 |s.....RT|S..tmTas|
|00001890| 6b 50 74 72 09 09 44 43 | 2e 4c 09 30 09 09 09 09 |kPtr..DC|.L.0....|
|000018a0| 09 3b 20 68 6f 6c 64 73 | 20 70 6f 69 6e 74 65 72 |.; holds| pointer|
|000018b0| 20 74 6f 20 74 69 6d 65 | 20 74 61 73 6b 20 72 65 | to time| task re|
|000018c0| 63 6f 72 64 20 6f 6e 0d | 09 09 09 09 09 09 09 09 |cord on.|........|
|000018d0| 09 09 09 3b 20 6f 6c 64 | 20 73 79 73 74 65 6d 73 |...; old| systems|
|000018e0| 20 74 68 61 74 20 77 6f | 6e 27 74 20 70 61 73 73 | that wo|n't pass|
|000018f0| 20 69 74 20 74 6f 20 75 | 73 0d 09 09 09 09 09 09 | it to u|s.......|
|00001900| 09 09 09 09 09 3b 20 77 | 68 65 6e 20 74 68 65 79 |.....; w|hen they|
|00001910| 20 63 61 6c 6c 20 75 73 | 2e 0d 0d 09 09 09 09 45 | call us|.......E|
|00001920| 4e 44 50 0d 0d 0d 3b 20 | 3d 3d 3d 3d 3d 3d 3d 3d |NDP...; |========|
|00001930| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001940| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001950| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001960| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001970| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 0d 3b 0d 3b |========|====.;.;|
|00001980| 20 50 52 4f 43 45 44 55 | 52 45 20 47 6f 46 69 67 | PROCEDU|RE GoFig|
|00001990| 67 65 72 28 78 2c 20 79 | 2c 20 50 6f 2c 20 51 6f |ger(x, y|, Po, Qo|
|000019a0| 3a 20 45 78 74 65 6e 64 | 65 64 3b 20 4d 2c 20 4b |: Extend|ed; M, K|
|000019b0| 3a 20 49 6e 74 65 67 65 | 72 3b 20 56 41 52 20 6b |: Intege|r; VAR k|
|000019c0| 6f 6c 3a 20 49 6e 74 65 | 67 65 72 29 3b 0d 3b 0d |ol: Inte|ger);.;.|
|000019d0| 3b 09 54 68 69 73 20 69 | 73 20 74 68 65 20 68 65 |;.This i|s the he|
|000019e0| 61 72 74 20 61 6e 64 20 | 73 6f 75 6c 20 6f 66 20 |art and |soul of |
|000019f0| 74 68 69 73 20 70 72 6f | 67 72 61 6d 2e 20 47 69 |this pro|gram. Gi|
|00001a00| 76 65 6e 20 61 20 70 6f | 69 6e 74 20 61 6e 64 20 |ven a po|int and |
|00001a10| 73 6f 6d 65 20 6f 74 68 | 65 72 0d 3b 09 64 65 66 |some oth|er.;.def|
|00001a20| 69 6e 69 6e 67 20 63 6f | 6e 73 74 61 6e 74 73 2c |ining co|nstants,|
|00001a30| 20 74 68 69 73 20 72 6f | 75 74 69 6e 65 20 66 69 | this ro|utine fi|
|00001a40| 67 75 72 65 73 20 6f 75 | 74 20 77 68 61 74 20 63 |gures ou|t what c|
|00001a50| 6f 6c 6f 72 20 74 68 65 | 20 70 6f 69 6e 74 20 73 |olor the| point s|
|00001a60| 68 6f 75 6c 64 20 62 65 | 2e 0d 3b 09 49 74 20 77 |hould be|..;.It w|
|00001a70| 6f 72 6b 73 20 6c 69 6b | 65 20 74 68 69 73 3a 0d |orks lik|e this:.|
|00001a80| 3b 0d 3b 09 4d 61 6e 64 | 65 6c 62 72 6f 74 20 66 |;.;.Mand|elbrot f|
|00001a90| 72 61 63 74 61 6c 73 20 | 61 72 65 20 63 61 6c 63 |ractals |are calc|
|00001aa0| 75 6c 61 74 65 64 20 6f | 6e 20 74 68 65 20 63 6f |ulated o|n the co|
|00001ab0| 6d 70 6c 65 78 20 63 6f | 6f 72 64 69 6e 61 74 65 |mplex co|ordinate|
|00001ac0| 20 70 6c 61 6e 65 2e 20 | 54 68 69 73 20 6d 65 61 | plane. |This mea|
|00001ad0| 6e 73 0d 3b 09 74 68 61 | 74 20 63 6f 6d 70 6c 65 |ns.;.tha|t comple|
|00001ae0| 78 20 6e 75 6d 62 65 72 | 73 20 6f 66 20 74 68 65 |x number|s of the|
|00001af0| 20 66 6f 72 6d 20 61 20 | 2b 20 69 62 20 61 72 65 | form a |+ ib are|
|00001b00| 20 70 6c 6f 74 74 65 64 | 20 69 6e 20 78 2c 79 20 | plotted| in x,y |
|00001b10| 66 61 73 68 69 6f 6e 20 | 6f 6e 20 61 20 74 77 6f |fashion |on a two|
|00001b20| 0d 3b 09 64 69 6d 65 6e | 73 69 6f 6e 61 6c 20 67 |.;.dimen|sional g|
|00001b30| 72 69 64 2e 20 54 68 65 | 20 76 61 6c 75 65 20 27 |rid. The| value '|
|00001b40| 61 27 20 69 73 20 70 6c | 6f 74 74 65 64 20 69 6e |a' is pl|otted in|
|00001b50| 20 74 68 65 20 78 2c 20 | 6f 72 20 72 65 61 6c 2c | the x, |or real,|
|00001b60| 20 64 69 72 65 63 74 69 | 6f 6e 2c 20 61 6e 64 0d | directi|on, and.|
|00001b70| 3b 09 74 68 65 20 76 61 | 6c 75 65 20 27 62 27 20 |;.the va|lue 'b' |
|00001b80| 69 73 20 70 6c 6f 74 74 | 65 64 20 69 6e 20 74 68 |is plott|ed in th|
|00001b90| 65 20 79 2c 20 6f 72 20 | 69 6d 61 67 69 6e 61 72 |e y, or |imaginar|
|00001ba0| 79 2c 20 64 69 72 65 63 | 74 69 6f 6e 2e 0d 3b 0d |y, direc|tion..;.|
|00001bb0| 3b 09 47 69 76 65 6e 20 | 61 20 70 6f 69 6e 74 20 |;.Given |a point |
|00001bc0| 61 20 2b 20 69 62 2c 20 | 77 65 20 73 71 75 61 72 |a + ib, |we squar|
|00001bd0| 65 20 69 74 20 61 6e 64 | 20 61 64 64 20 61 20 63 |e it and| add a c|
|00001be0| 6f 6d 70 6c 65 78 20 63 | 6f 6e 73 74 61 6e 74 20 |omplex c|onstant |
|00001bf0| 43 20 3d 20 50 6f 20 2b | 20 69 51 6f 2e 20 57 65 |C = Po +| iQo. We|
|00001c00| 0d 3b 09 74 68 65 6e 20 | 63 68 65 63 6b 20 74 6f |.;.then |check to|
|00001c10| 20 73 65 65 20 68 6f 77 | 20 66 61 72 20 74 68 65 | see how| far the|
|00001c20| 20 72 65 73 75 6c 74 20 | 69 73 20 61 77 61 79 20 | result |is away |
|00001c30| 66 72 6f 6d 20 74 68 65 | 20 66 69 72 73 74 20 70 |from the| first p|
|00001c40| 6f 69 6e 74 2e 20 49 66 | 20 69 74 20 69 73 0d 3b |oint. If| it is.;|
|00001c50| 09 66 61 72 74 68 65 72 | 20 74 68 61 6e 20 73 6f |.farther| than so|
|00001c60| 6d 65 20 6c 69 6d 69 74 | 20 28 63 61 6c 6c 65 64 |me limit| (called|
|00001c70| 20 4d 20 68 65 72 65 29 | 2c 20 77 65 20 61 72 65 | M here)|, we are|
|00001c80| 20 64 6f 6e 65 2e 20 49 | 66 20 74 68 65 20 72 65 | done. I|f the re|
|00001c90| 73 75 6c 74 20 69 73 20 | 77 69 74 68 69 6e 0d 3b |sult is |within.;|
|00001ca0| 09 74 68 61 74 20 6c 69 | 6d 69 74 2c 20 77 65 20 |.that li|mit, we |
|00001cb0| 61 70 70 6c 79 20 74 68 | 65 20 66 6f 72 6d 75 6c |apply th|e formul|
|00001cc0| 61 20 61 67 61 69 6e 20 | 74 6f 20 74 68 61 74 20 |a again |to that |
|00001cd0| 72 65 73 75 6c 74 2e 20 | 57 65 20 6b 65 65 70 20 |result. |We keep |
|00001ce0| 74 68 69 73 20 70 72 6f | 63 65 73 73 20 75 70 0d |this pro|cess up.|
|00001cf0| 3b 09 75 6e 74 69 6c 20 | 77 65 20 65 69 74 68 65 |;.until |we eithe|
|00001d00| 72 20 67 6f 20 6f 75 74 | 73 69 64 65 20 74 68 65 |r go out|side the|
|00001d10| 20 6c 69 6d 69 74 20 22 | 4d 22 2c 20 6f 72 20 77 | limit "|M", or w|
|00001d20| 65 20 68 61 76 65 20 70 | 65 72 66 6f 72 6d 65 64 |e have p|erformed|
|00001d30| 20 74 68 69 73 20 70 72 | 6f 63 65 73 73 20 61 0d | this pr|ocess a.|
|00001d40| 3b 09 63 65 72 74 61 69 | 6e 20 6e 75 6d 62 65 72 |;.certai|n number|
|00001d50| 20 6f 66 20 74 69 6d 65 | 73 20 28 63 61 6c 6c 65 | of time|s (calle|
|00001d60| 64 20 74 68 65 20 64 77 | 65 6c 6c 20 6c 69 6d 69 |d the dw|ell limi|
|00001d70| 74 29 2e 20 49 74 20 69 | 73 20 74 68 69 73 20 6e |t). It i|s this n|
|00001d80| 75 6d 62 65 72 20 6f 66 | 0d 3b 09 69 74 65 72 61 |umber of|.;.itera|
|00001d90| 74 69 6f 6e 73 20 74 68 | 61 74 20 64 65 74 65 72 |tions th|at deter|
|00001da0| 6d 69 6e 65 73 20 74 68 | 65 20 63 6f 6c 6f 72 20 |mines th|e color |
|00001db0| 6f 66 20 74 68 65 20 70 | 69 78 65 6c 2e 20 49 66 |of the p|ixel. If|
|00001dc0| 20 77 65 20 65 78 63 65 | 65 64 20 6f 75 72 20 6d | we exce|ed our m|
|00001dd0| 61 78 69 6d 75 6d 0d 3b | 09 6e 75 6d 62 65 72 20 |aximum.;|.number |
|00001de0| 6f 66 20 69 74 65 72 61 | 74 69 6f 6e 73 2c 20 77 |of itera|tions, w|
|00001df0| 65 20 6d 61 70 20 74 68 | 65 20 63 6f 6c 6f 72 20 |e map th|e color |
|00001e00| 74 6f 20 62 6c 61 63 6b | 2e 0d 3b 0d 3b 20 3d 3d |to black|..;.; ==|
|00001e10| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001e20| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001e30| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001e40| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001e50| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001e60| 3d 3d 0d 0d 09 09 09 09 | 53 45 47 09 09 27 41 52 |==......|SEG..'AR|
|00001e70| 65 73 27 0d 54 46 52 41 | 43 41 50 50 45 4e 47 49 |es'.TFRA|CAPPENGI|
|00001e80| 4e 45 5f 47 4f 46 49 47 | 47 45 52 09 50 52 4f 43 |NE_GOFIG|GER.PROC|
|00001e90| 09 45 58 50 4f 52 54 0d | 0d 53 74 61 63 6b 46 72 |.EXPORT.|.StackFr|
|00001ea0| 61 6d 65 09 09 52 45 43 | 4f 52 44 09 7b 41 36 4c |ame..REC|ORD.{A6L|
|00001eb0| 69 6e 6b 7d 2c 44 45 43 | 52 0d 78 50 74 72 09 09 |ink},DEC|R.xPtr..|
|00001ec0| 09 44 53 2e 4c 09 31 09 | 09 09 09 09 09 3b 20 70 |.DS.L.1.|.....; p|
|00001ed0| 74 72 20 74 6f 20 69 6e | 69 74 69 61 6c 20 27 61 |tr to in|itial 'a|
|00001ee0| 27 0d 79 50 74 72 09 09 | 09 44 53 2e 4c 09 31 09 |'.yPtr..|.DS.L.1.|
|00001ef0| 09 09 09 09 09 3b 20 70 | 74 72 20 74 6f 20 69 6e |.....; p|tr to in|
|00001f00| 69 74 69 61 6c 20 27 62 | 27 0d 50 6f 50 74 72 09 |itial 'b|'.PoPtr.|
|00001f10| 09 09 44 53 2e 4c 09 31 | 09 09 09 09 09 09 3b 20 |..DS.L.1|......; |
|00001f20| 70 74 72 20 74 6f 20 72 | 65 61 6c 20 70 61 72 74 |ptr to r|eal part|
|00001f30| 20 6f 66 20 63 6f 6e 73 | 74 61 6e 74 0d 51 6f 50 | of cons|tant.QoP|
|00001f40| 74 72 09 09 09 44 53 2e | 4c 09 31 09 09 09 09 09 |tr...DS.|L.1.....|
|00001f50| 09 3b 20 70 74 72 20 74 | 6f 20 69 6d 61 67 20 70 |.; ptr t|o imag p|
|00001f60| 61 72 74 20 6f 66 20 63 | 6f 6e 73 74 61 6e 74 0d |art of c|onstant.|
|00001f70| 4d 09 09 09 09 44 53 2e | 57 09 31 09 09 09 09 09 |M....DS.|W.1.....|
|00001f80| 09 3b 20 6d 61 78 69 6d | 75 6d 20 64 69 73 74 61 |.; maxim|um dista|
|00001f90| 6e 63 65 20 74 6f 20 72 | 6f 61 6d 0d 4b 09 09 09 |nce to r|oam.K...|
|00001fa0| 09 44 53 2e 57 09 31 09 | 09 09 09 09 09 3b 20 64 |.DS.W.1.|.....; d|
|00001fb0| 77 65 6c 6c 20 6c 69 6d | 69 74 0d 6b 6f 6c 50 74 |well lim|it.kolPt|
|00001fc0| 72 09 09 09 44 53 2e 4c | 09 31 09 09 09 09 09 09 |r...DS.L|.1......|
|00001fd0| 3b 20 6c 6f 63 61 74 69 | 6f 6e 20 74 6f 20 72 65 |; locati|on to re|
|00001fe0| 74 75 72 6e 20 69 74 65 | 72 61 74 69 6f 6e 20 63 |turn ite|ration c|
|00001ff0| 6f 75 6e 74 0d 53 45 4c | 46 09 09 09 44 53 2e 4c |ount.SEL|F...DS.L|
|00002000| 09 31 09 09 09 09 09 09 | 3b 20 72 65 66 65 72 65 |.1......|; refere|
|00002010| 6e 63 65 20 74 6f 20 6d | 79 73 65 6c 66 20 28 6d |nce to m|yself (m|
|00002020| 79 20 6f 62 6a 65 63 74 | 29 0d 50 61 72 61 6d 53 |y object|).ParamS|
|00002030| 69 7a 65 09 09 45 51 55 | 09 09 53 74 61 63 6b 46 |ize..EQU|..StackF|
|00002040| 72 61 6d 65 2d 2a 09 09 | 09 3b 20 73 69 7a 65 20 |rame-*..|.; size |
|00002050| 6f 66 20 61 6c 6c 20 74 | 68 65 20 70 61 73 73 65 |of all t|he passe|
|00002060| 64 20 70 61 72 61 6d 65 | 74 65 72 73 0d 52 65 74 |d parame|ters.Ret|
|00002070| 41 64 64 72 09 09 09 44 | 53 2e 4c 09 31 09 09 09 |Addr...D|S.L.1...|
|00002080| 09 09 09 3b 20 70 6c 61 | 63 65 20 68 6f 6c 64 65 |...; pla|ce holde|
|00002090| 72 20 66 6f 72 20 72 65 | 74 75 72 6e 20 61 64 64 |r for re|turn add|
|000020a0| 72 65 73 73 0d 41 36 4c | 69 6e 6b 09 09 09 44 53 |ress.A6L|ink...DS|
|000020b0| 2e 4c 09 31 0d 09 09 09 | 09 45 4e 44 52 0d 0d 78 |.L.1....|.ENDR..x|
|000020c0| 09 09 09 09 45 51 55 09 | 09 46 50 37 09 09 09 09 |....EQU.|.FP7....|
|000020d0| 09 09 3b 20 68 6f 6c 64 | 20 69 6e 20 72 65 67 69 |..; hold| in regi|
|000020e0| 73 74 65 72 20 66 6f 72 | 20 73 70 65 65 64 0d 79 |ster for| speed.y|
|000020f0| 09 09 09 09 45 51 55 09 | 09 46 50 36 09 09 09 09 |....EQU.|.FP6....|
|00002100| 09 09 3b 20 68 6f 6c 64 | 20 69 6e 20 72 65 67 69 |..; hold| in regi|
|00002110| 73 74 65 72 20 66 6f 72 | 20 73 70 65 65 64 0d 50 |ster for| speed.P|
|00002120| 6f 09 09 09 09 45 51 55 | 09 09 46 50 35 09 09 09 |o....EQU|..FP5...|
|00002130| 09 09 09 3b 20 68 6f 6c | 64 20 69 6e 20 72 65 67 |...; hol|d in reg|
|00002140| 69 73 74 65 72 20 66 6f | 72 20 73 70 65 65 64 0d |ister fo|r speed.|
|00002150| 51 6f 09 09 09 09 45 51 | 55 09 09 46 50 34 09 09 |Qo....EQ|U..FP4..|
|00002160| 09 09 09 09 3b 20 68 6f | 6c 64 20 69 6e 20 72 65 |....; ho|ld in re|
|00002170| 67 69 73 74 65 72 20 66 | 6f 72 20 73 70 65 65 64 |gister f|or speed|
|00002180| 0d 78 53 71 75 61 72 65 | 64 09 09 45 51 55 09 09 |.xSquare|d..EQU..|
|00002190| 46 50 33 09 09 09 09 09 | 09 3b 0d 79 53 71 75 61 |FP3.....|.;.ySqua|
|000021a0| 72 65 64 09 09 45 51 55 | 09 09 46 50 32 0d 72 61 |red..EQU|..FP2.ra|
|000021b0| 64 69 75 73 09 09 09 45 | 51 55 09 09 46 50 31 09 |dius...E|QU..FP1.|
|000021c0| 09 09 09 09 09 3b 20 68 | 6f 6c 64 73 20 27 4d 27 |.....; h|olds 'M'|
|000021d0| 20 66 6f 72 20 73 70 65 | 65 64 0d 73 63 72 61 74 | for spe|ed.scrat|
|000021e0| 63 68 09 09 09 45 51 55 | 09 09 46 50 30 0d 0d 64 |ch...EQU|..FP0..d|
|000021f0| 77 65 6c 6c 4d 61 78 09 | 09 45 51 55 09 09 44 31 |wellMax.|.EQU..D1|
|00002200| 09 09 09 09 09 09 3b 20 | 68 6f 6c 64 73 20 27 4b |......; |holds 'K|
|00002210| 27 20 66 6f 72 20 73 70 | 65 65 64 0d 63 6f 75 6e |' for sp|eed.coun|
|00002220| 74 44 6f 77 6e 09 09 45 | 51 55 09 09 44 32 09 09 |tDown..E|QU..D2..|
|00002230| 09 09 09 09 3b 20 68 6f | 6c 64 73 20 6e 75 6d 62 |....; ho|lds numb|
|00002240| 65 72 20 6f 66 20 69 74 | 65 72 61 74 69 6f 6e 73 |er of it|erations|
|00002250| 0d 0d 73 61 76 65 64 52 | 65 67 73 09 09 52 45 47 |..savedR|egs..REG|
|00002260| 09 09 44 31 2d 44 32 0d | 73 61 76 65 64 46 50 52 |..D1-D2.|savedFPR|
|00002270| 65 67 73 09 09 46 52 45 | 47 09 46 50 34 2d 46 50 |egs..FRE|G.FP4-FP|
|00002280| 37 0d 0d 09 09 09 09 57 | 49 54 48 20 09 53 74 61 |7......W|ITH .Sta|
|00002290| 63 6b 46 72 61 6d 65 0d | 0d 09 09 09 09 4c 49 4e |ckFrame.|.....LIN|
|000022a0| 4b 09 41 36 2c 23 41 36 | 4c 69 6e 6b 09 09 09 3b |K.A6,#A6|Link...;|
|000022b0| 20 4c 69 6e 6b 20 73 6f | 20 74 68 61 74 20 49 20 | Link so| that I |
|000022c0| 63 61 6e 20 67 65 74 20 | 74 6f 20 6d 79 20 56 41 |can get |to my VA|
|000022d0| 52 73 0d 09 09 09 09 4d | 4f 56 45 4d 2e 4c 09 73 |Rs.....M|OVEM.L.s|
|000022e0| 61 76 65 64 52 65 67 73 | 2c 2d 28 41 37 29 09 09 |avedRegs|,-(A7)..|
|000022f0| 3b 20 53 61 76 65 20 74 | 68 65 20 72 65 67 69 73 |; Save t|he regis|
|00002300| 74 65 72 73 20 49 27 6c | 6c 20 74 72 61 73 68 20 |ters I'l|l trash |
|00002310| 74 68 61 74 2e 2e 2e 0d | 09 09 09 09 46 4d 4f 56 |that....|....FMOV|
|00002320| 45 4d 09 73 61 76 65 64 | 46 50 52 65 67 73 2c 2d |EM.saved|FPRegs,-|
|00002330| 28 41 37 29 09 3b 20 2e | 2e 2e 61 72 65 6e 27 74 |(A7).; .|..aren't|
|00002340| 20 64 65 66 69 6e 65 64 | 20 61 73 20 73 63 72 61 | defined| as scra|
|00002350| 74 63 68 20 72 65 67 69 | 73 74 65 72 73 0d 0d 09 |tch regi|sters...|
|00002360| 09 09 09 4d 4f 56 45 41 | 2e 4c 09 51 6f 50 74 72 |...MOVEA|.L.QoPtr|
|00002370| 28 41 36 29 2c 41 30 09 | 09 3b 20 47 65 74 20 6d |(A6),A0.|.; Get m|
|00002380| 79 20 69 6e 69 74 69 61 | 6c 20 70 6f 69 6e 74 0d |y initia|l point.|
|00002390| 09 09 09 09 46 4d 4f 56 | 45 2e 58 09 28 41 30 29 |....FMOV|E.X.(A0)|
|000023a0| 2c 51 6f 0d 09 09 09 09 | 4d 4f 56 45 41 2e 4c 09 |,Qo.....|MOVEA.L.|
|000023b0| 50 6f 50 74 72 28 41 36 | 29 2c 41 30 0d 09 09 09 |PoPtr(A6|),A0....|
|000023c0| 09 46 4d 4f 56 45 2e 58 | 09 28 41 30 29 2c 50 6f |.FMOVE.X|.(A0),Po|
|000023d0| 0d 0d 09 09 09 09 4d 4f | 56 45 41 2e 4c 09 79 50 |......MO|VEA.L.yP|
|000023e0| 74 72 28 41 36 29 2c 41 | 30 09 09 09 3b 20 47 65 |tr(A6),A|0...; Ge|
|000023f0| 74 20 74 68 65 20 6f 72 | 69 67 69 6e 0d 09 09 09 |t the or|igin....|
|00002400| 09 46 4d 4f 56 45 2e 58 | 09 28 41 30 29 2c 79 0d |.FMOVE.X|.(A0),y.|
|00002410| 09 09 09 09 4d 4f 56 45 | 41 2e 4c 09 78 50 74 72 |....MOVE|A.L.xPtr|
|00002420| 28 41 36 29 2c 41 30 0d | 09 09 09 09 46 4d 4f 56 |(A6),A0.|....FMOV|
|00002430| 45 2e 58 09 28 41 30 29 | 2c 78 0d 0d 09 09 09 09 |E.X.(A0)|,x......|
|00002440| 4d 4f 56 45 09 4b 28 41 | 36 29 2c 64 77 65 6c 6c |MOVE.K(A|6),dwell|
|00002450| 4d 61 78 09 09 3b 20 47 | 65 74 20 6d 79 20 64 77 |Max..; G|et my dw|
|00002460| 65 6c 6c 20 74 69 6d 65 | 0d 09 09 09 09 46 4d 4f |ell time|.....FMO|
|00002470| 56 45 2e 57 09 4d 28 41 | 36 29 2c 72 61 64 69 75 |VE.W.M(A|6),radiu|
|00002480| 73 09 09 3b 20 47 65 74 | 20 74 68 65 20 64 69 73 |s..; Get| the dis|
|00002490| 74 61 6e 63 65 20 6c 69 | 6d 69 74 0d 0d 09 09 09 |tance li|mit.....|
|000024a0| 09 4d 4f 56 45 09 64 77 | 65 6c 6c 4d 61 78 2c 63 |.MOVE.dw|ellMax,c|
|000024b0| 6f 75 6e 74 44 6f 77 6e | 09 3b 20 73 65 74 20 63 |ountDown|.; set c|
|000024c0| 6f 75 6e 74 65 72 20 74 | 6f 20 6d 61 78 69 6d 75 |ounter t|o maximu|
|000024d0| 6d 20 28 77 65 27 6c 6c | 20 63 6f 75 6e 74 20 64 |m (we'll| count d|
|000024e0| 6f 77 6e 29 0d 0d 09 09 | 09 09 42 52 41 2e 53 09 |own)....|..BRA.S.|
|000024f0| 54 65 73 74 45 6e 64 0d | 0d 3b 09 09 09 47 69 76 |TestEnd.|.;...Giv|
|00002500| 65 6e 20 61 20 70 6f 69 | 6e 74 3a 20 70 74 20 3d |en a poi|nt: pt =|
|00002510| 20 78 20 2b 20 69 79 2c | 0d 3b 09 09 09 61 6e 64 | x + iy,|.;...and|
|00002520| 20 61 20 63 6f 6e 73 74 | 61 6e 74 3a 20 43 20 3d | a const|ant: C =|
|00002530| 20 50 6f 20 2b 20 69 51 | 6f 2c 0d 3b 09 09 09 69 | Po + iQ|o,.;...i|
|00002540| 74 65 72 61 74 69 76 65 | 6c 79 20 63 61 6c 63 75 |terative|ly calcu|
|00002550| 6c 61 74 65 20 70 74 32 | 20 3d 20 70 74 5e 32 20 |late pt2| = pt^2 |
|00002560| 2b 20 43 0d 3b 09 09 09 | 09 09 09 09 09 09 20 20 |+ C.;...|......  |
|00002570| 3d 20 28 78 20 2b 20 69 | 79 29 5e 32 20 2b 20 28 |= (x + i|y)^2 + (|
|00002580| 50 6f 20 2b 20 69 51 6f | 29 0d 3b 09 09 09 09 09 |Po + iQo|).;.....|
|00002590| 09 09 09 09 20 20 3d 20 | 28 78 5e 32 20 2b 20 32 |....  = |(x^2 + 2|
|000025a0| 69 78 79 20 2d 20 79 5e | 32 29 20 2b 20 28 50 6f |ixy - y^|2) + (Po|
|000025b0| 20 2b 20 69 51 6f 29 0d | 3b 09 09 09 09 09 09 09 | + iQo).|;.......|
|000025c0| 09 09 20 20 3d 20 28 78 | 5e 32 20 20 2d 20 79 5e |..  = (x|^2  - y^|
|000025d0| 32 20 2b 20 50 6f 29 20 | 2b 20 69 28 32 78 79 20 |2 + Po) |+ i(2xy |
|000025e0| 2b 20 51 6f 29 0d 3b 09 | 09 09 75 6e 74 69 6c 20 |+ Qo).;.|..until |
|000025f0| 70 74 32 20 69 73 20 61 | 74 20 6c 65 61 73 74 20 |pt2 is a|t least |
|00002600| 22 4d 22 20 75 6e 69 74 | 73 20 66 72 6f 6d 20 74 |"M" unit|s from t|
|00002610| 68 65 20 6f 72 69 67 69 | 6e 61 6c 20 70 6f 69 6e |he origi|nal poin|
|00002620| 74 2e 0d 3b 09 09 09 54 | 68 65 20 6e 75 6d 62 65 |t..;...T|he numbe|
|00002630| 72 20 6f 66 20 74 69 6d | 65 73 20 74 68 61 74 20 |r of tim|es that |
|00002640| 69 74 20 74 6f 6f 6b 20 | 75 73 20 74 6f 20 67 65 |it took |us to ge|
|00002650| 74 20 74 6f 20 74 68 69 | 73 20 73 74 61 74 65 20 |t to thi|s state |
|00002660| 67 65 74 73 0d 3b 09 09 | 09 6d 61 70 70 65 64 20 |gets.;..|.mapped |
|00002670| 69 6e 74 6f 20 74 68 65 | 20 63 6f 6c 6f 72 20 74 |into the| color t|
|00002680| 68 61 74 20 77 65 20 75 | 73 65 20 66 6f 72 20 74 |hat we u|se for t|
|00002690| 68 61 74 20 70 6f 69 6e | 74 2e 20 49 66 20 77 65 |hat poin|t. If we|
|000026a0| 20 69 74 65 72 61 74 65 | 64 20 6d 6f 72 65 0d 3b | iterate|d more.;|
|000026b0| 09 09 09 74 68 61 6e 20 | 61 20 63 65 72 74 61 69 |...than |a certai|
|000026c0| 6e 20 6d 61 78 69 6d 75 | 6d 2c 20 74 68 65 6e 20 |n maximu|m, then |
|000026d0| 77 65 20 63 61 70 20 74 | 68 65 20 63 6f 6c 6f 72 |we cap t|he color|
|000026e0| 20 74 6f 20 74 68 61 74 | 20 6d 61 78 69 6d 75 6d | to that| maximum|
|000026f0| 2e 0d 0d 6c 6f 6f 70 0d | 09 09 09 09 09 09 09 09 |...loop.|........|
|00002700| 09 09 3b 20 4d 61 6b 65 | 20 79 20 3a 3d 20 32 2a |..; Make| y := 2*|
|00002710| 78 2a 79 20 2b 20 51 6f | 0d 09 09 09 09 46 41 44 |x*y + Qo|.....FAD|
|00002720| 44 09 79 2c 79 09 09 09 | 09 09 3b 20 79 20 3a 3d |D.y,y...|..; y :=|
|00002730| 20 79 2b 79 20 3a 3d 20 | 32 2a 79 0d 09 09 09 09 | y+y := |2*y.....|
|00002740| 46 4d 55 4c 09 78 2c 79 | 09 09 09 09 09 3b 20 79 |FMUL.x,y|.....; y|
|00002750| 20 3a 3d 20 78 2a 79 20 | 3a 3d 20 78 2a 28 32 2a | := x*y |:= x*(2*|
|00002760| 79 29 20 3a 3d 20 32 2a | 78 2a 79 0d 09 09 09 09 |y) := 2*|x*y.....|
|00002770| 46 41 44 44 09 51 6f 2c | 79 09 09 09 09 3b 20 79 |FADD.Qo,|y....; y|
|00002780| 20 3a 3d 20 32 2a 78 2a | 79 20 2b 20 51 6f 0d 0d | := 2*x*|y + Qo..|
|00002790| 09 09 09 09 46 4d 4f 56 | 45 2e 58 09 78 53 71 75 |....FMOV|E.X.xSqu|
|000027a0| 61 72 65 64 2c 78 09 09 | 09 3b 20 78 20 3a 3d 20 |ared,x..|.; x := |
|000027b0| 78 5e 32 20 2d 20 79 5e | 32 20 2b 20 50 6f 0d 09 |x^2 - y^|2 + Po..|
|000027c0| 09 09 09 46 53 55 42 09 | 79 53 71 75 61 72 65 64 |...FSUB.|ySquared|
|000027d0| 2c 78 0d 09 09 09 09 46 | 41 44 44 09 50 6f 2c 78 |,x.....F|ADD.Po,x|
|000027e0| 0d 0d 0d 54 65 73 74 45 | 6e 64 0d 09 09 09 09 46 |...TestE|nd.....F|
|000027f0| 4d 4f 56 45 2e 58 09 79 | 2c 79 53 71 75 61 72 65 |MOVE.X.y|,ySquare|
|00002800| 64 09 09 09 3b 20 79 53 | 71 75 61 72 65 64 20 3a |d...; yS|quared :|
|00002810| 3d 20 79 2a 79 0d 09 09 | 09 09 46 4d 55 4c 09 79 |= y*y...|..FMUL.y|
|00002820| 2c 79 53 71 75 61 72 65 | 64 0d 09 09 09 09 46 4d |,ySquare|d.....FM|
|00002830| 4f 56 45 2e 58 09 78 2c | 78 53 71 75 61 72 65 64 |OVE.X.x,|xSquared|
|00002840| 09 09 09 3b 20 78 53 71 | 75 61 72 65 64 20 3a 3d |...; xSq|uared :=|
|00002850| 20 78 2a 78 0d 09 09 09 | 09 46 4d 55 4c 09 78 2c | x*x....|.FMUL.x,|
|00002860| 78 53 71 75 61 72 65 64 | 0d 0d 09 09 09 09 46 4d |xSquared|......FM|
|00002870| 4f 56 45 2e 58 09 79 53 | 71 75 61 72 65 64 2c 73 |OVE.X.yS|quared,s|
|00002880| 63 72 61 74 63 68 09 3b | 20 69 73 20 78 53 71 75 |cratch.;| is xSqu|
|00002890| 61 72 65 64 20 2b 20 79 | 53 71 75 61 72 65 64 20 |ared + y|Squared |
|000028a0| 3e 20 72 61 64 69 75 73 | 3f 0d 09 09 09 09 46 41 |> radius|?.....FA|
|000028b0| 44 44 09 78 53 71 75 61 | 72 65 64 2c 73 63 72 61 |DD.xSqua|red,scra|
|000028c0| 74 63 68 0d 09 09 09 09 | 46 43 4d 50 09 72 61 64 |tch.....|FCMP.rad|
|000028d0| 69 75 73 2c 73 63 72 61 | 74 63 68 0d 09 09 09 09 |ius,scra|tch.....|
|000028e0| 46 44 42 47 45 09 63 6f | 75 6e 74 44 6f 77 6e 2c |FDBGE.co|untDown,|
|000028f0| 6c 6f 6f 70 09 09 3b 20 | 6e 6f 20 28 61 6c 73 6f |loop..; |no (also|
|00002900| 2c 20 74 65 73 74 20 74 | 68 65 20 74 68 72 65 73 |, test t|he thres|
|00002910| 68 6f 6c 64 20 63 6f 75 | 6e 74 65 72 29 0d 0d 4f |hold cou|nter)..O|
|00002920| 75 74 61 48 65 72 65 0d | 09 09 09 09 4d 4f 56 45 |utaHere.|....MOVE|
|00002930| 41 2e 4c 09 6b 6f 6c 50 | 74 72 28 41 36 29 2c 41 |A.L.kolP|tr(A6),A|
|00002940| 30 09 09 3b 20 67 65 74 | 20 61 20 70 6f 69 6e 74 |0..; get| a point|
|00002950| 65 72 20 74 6f 20 6f 75 | 72 20 72 65 74 75 72 6e |er to ou|r return|
|00002960| 20 76 61 72 69 61 62 6c | 65 0d 09 09 09 09 53 55 | variabl|e.....SU|
|00002970| 42 09 09 63 6f 75 6e 74 | 44 6f 77 6e 2c 64 77 65 |B..count|Down,dwe|
|00002980| 6c 6c 4d 61 78 09 3b 20 | 67 65 74 20 6e 75 6d 62 |llMax.; |get numb|
|00002990| 65 72 20 6f 66 20 69 74 | 65 72 61 74 69 6f 6e 73 |er of it|erations|
|000029a0| 0d 09 09 09 09 4d 4f 56 | 45 09 64 77 65 6c 6c 4d |.....MOV|E.dwellM|
|000029b0| 61 78 2c 28 41 30 29 09 | 09 3b 20 73 74 6f 72 65 |ax,(A0).|.; store|
|000029c0| 20 6e 75 6d 62 65 72 20 | 69 74 65 72 61 74 69 6f | number |iteratio|
|000029d0| 6e 73 20 69 6e 74 6f 20 | 6b 6f 6c 0d 09 09 09 09 |ns into |kol.....|
|000029e0| 46 4d 4f 56 45 4d 09 28 | 41 37 29 2b 2c 73 61 76 |FMOVEM.(|A7)+,sav|
|000029f0| 65 64 46 50 52 65 67 73 | 09 3b 20 72 65 73 74 6f |edFPRegs|.; resto|
|00002a00| 72 65 20 74 68 65 20 72 | 65 67 69 73 74 65 72 73 |re the r|egisters|
|00002a10| 20 77 65 20 6e 75 6b 65 | 64 0d 09 09 09 09 4d 4f | we nuke|d.....MO|
|00002a20| 56 45 4d 2e 4c 09 28 41 | 37 29 2b 2c 73 61 76 65 |VEM.L.(A|7)+,save|
|00002a30| 64 52 65 67 73 0d 09 09 | 09 09 55 4e 4c 4b 09 41 |dRegs...|..UNLK.A|
|00002a40| 36 0d 0d 09 09 09 69 66 | 20 71 4e 65 65 64 73 4d |6.....if| qNeedsM|
|00002a50| 43 36 38 30 32 30 20 7c | 20 71 4e 65 65 64 73 4d |C68020 || qNeedsM|
|00002a60| 43 36 38 30 33 30 20 74 | 68 65 6e 0d 0d 09 09 09 |C68030 t|hen.....|
|00002a70| 09 52 54 44 09 09 23 50 | 61 72 61 6d 53 69 7a 65 |.RTD..#P|aramSize|
|00002a80| 09 09 09 3b 20 4e 69 63 | 65 2c 20 66 61 73 74 20 |...; Nic|e, fast |
|00002a90| 36 38 30 32 30 20 72 65 | 74 75 72 6e 0d 0d 09 09 |68020 re|turn....|
|00002aa0| 09 65 6c 73 65 0d 0d 09 | 09 09 09 4d 4f 56 45 41 |.else...|...MOVEA|
|00002ab0| 2e 4c 09 28 41 37 29 2b | 2c 41 30 09 09 09 3b 20 |.L.(A7)+|,A0...; |
|00002ac0| 70 6f 70 20 74 68 65 20 | 72 65 74 75 72 6e 20 61 |pop the |return a|
|00002ad0| 64 64 72 65 73 73 0d 09 | 09 09 09 41 44 44 09 09 |ddress..|...ADD..|
|00002ae0| 23 50 61 72 61 6d 53 69 | 7a 65 2c 41 37 09 09 3b |#ParamSi|ze,A7..;|
|00002af0| 20 74 72 61 73 68 20 74 | 68 65 20 70 61 72 61 6d | trash t|he param|
|00002b00| 65 74 65 72 0d 09 09 09 | 09 4a 4d 50 09 09 28 41 |eter....|.JMP..(A|
|00002b10| 30 29 09 09 09 09 3b 20 | 72 65 74 75 72 6e 0d 0d |0)....; |return..|
|00002b20| 09 09 09 65 6e 64 69 66 | 0d 0d 09 09 09 09 45 4e |...endif|......EN|
|00002b30| 44 50 0d 09 09 09 09 45 | 4e 44 0d 0d 0d 0d 09 09 |DP.....E|ND......|
|00002b40| 09 09 09 09 3d 3d 20 3d | 3d 3d 3d 20 3d 3d 3d 3d |....== =|=== ====|
|00002b50| 3d 3d 3d 3d 20 3d 3d 20 | 3d 3d 3d 3d 20 3d 3d 3d |==== == |==== ===|
|00002b60| 3d 20 3d 3d 0d 09 09 09 | 09 09 09 3d 20 20 54 49 |= ==....|...=  TI|
|00002b70| 4d 45 20 41 4e 41 4c 59 | 53 49 53 20 4f 46 20 43 |ME ANALY|SIS OF C|
|00002b80| 4f 52 45 20 4c 4f 4f 50 | 20 20 3d 0d 09 09 09 09 |ORE LOOP|  =.....|
|00002b90| 09 09 3d 3d 20 3d 3d 3d | 3d 20 3d 3d 3d 3d 3d 3d |..== ===|= ======|
|00002ba0| 3d 3d 20 3d 3d 20 3d 3d | 3d 3d 20 3d 3d 3d 3d 20 |== == ==|== ==== |
|00002bb0| 3d 3d 0d 0d 3b 0d 3b 20 | 54 68 69 73 20 69 73 20 |==..;.; |This is |
|00002bc0| 61 6e 20 61 6e 61 6c 79 | 73 69 73 20 6f 66 20 74 |an analy|sis of t|
|00002bd0| 68 65 20 6c 6f 6f 70 20 | 6f 66 20 47 6f 46 69 67 |he loop |of GoFig|
|00002be0| 67 65 72 20 74 68 61 74 | 20 65 78 74 65 6e 64 73 |ger that| extends|
|00002bf0| 20 66 72 6f 6d 20 74 68 | 65 20 22 6c 6f 6f 70 22 | from th|e "loop"|
|00002c00| 20 6c 61 62 65 6c 0d 3b | 20 61 6c 6c 20 74 68 65 | label.;| all the|
|00002c10| 20 77 61 79 20 64 6f 77 | 6e 20 74 6f 20 74 68 65 | way dow|n to the|
|00002c20| 20 46 44 47 42 45 20 69 | 6e 73 74 72 75 63 74 69 | FDGBE i|nstructi|
|00002c30| 6f 6e 20 28 6a 75 73 74 | 20 62 65 66 6f 72 65 20 |on (just| before |
|00002c40| 74 68 65 20 22 4f 6f 75 | 74 61 48 65 72 65 22 20 |the "Oou|taHere" |
|00002c50| 6c 61 62 65 6c 29 2e 0d | 3b 20 55 73 69 6e 67 20 |label)..|; Using |
|00002c60| 74 68 65 20 70 65 72 66 | 6f 72 6d 61 6e 63 65 20 |the perf|ormance |
|00002c70| 74 6f 6f 6c 73 2c 20 49 | 27 76 65 20 6e 6f 74 69 |tools, I|'ve noti|
|00002c80| 63 65 64 20 74 68 61 74 | 20 46 72 61 63 41 70 70 |ced that| FracApp|
|00002c90| 20 73 70 65 6e 64 73 20 | 6d 6f 73 74 20 6f 66 20 | spends |most of |
|00002ca0| 69 74 73 20 74 69 6d 65 | 0d 3b 20 69 6e 20 74 68 |its time|.; in th|
|00002cb0| 69 73 20 6c 6f 6f 70 20 | 28 61 73 20 6d 75 63 68 |is loop |(as much|
|00002cc0| 20 61 73 20 38 30 2d 39 | 30 25 29 2e 20 54 68 65 | as 80-9|0%). The|
|00002cd0| 72 65 66 6f 72 65 2c 20 | 69 74 27 73 20 76 65 72 |refore, |it's ver|
|00002ce0| 79 20 63 72 69 74 69 63 | 61 6c 20 74 68 61 74 20 |y critic|al that |
|00002cf0| 74 68 69 73 20 6c 6f 6f | 70 0d 3b 20 72 75 6e 20 |this loo|p.; run |
|00002d00| 61 73 20 66 61 73 74 20 | 61 73 20 70 6f 73 73 69 |as fast |as possi|
|00002d10| 62 6c 65 2c 20 73 6f 20 | 74 68 61 74 20 77 65 20 |ble, so |that we |
|00002d20| 63 61 6e 20 73 65 65 20 | 6f 75 72 20 70 69 63 74 |can see |our pict|
|00002d30| 75 72 65 73 20 61 73 20 | 66 61 73 74 20 61 73 20 |ures as |fast as |
|00002d40| 70 6f 73 73 69 62 6c 65 | 2e 0d 3b 0d 3b 20 54 68 |possible|..;.; Th|
|00002d50| 69 73 20 72 6f 75 74 69 | 6e 65 20 77 61 73 20 6f |is routi|ne was o|
|00002d60| 72 69 67 69 6e 61 6c 6c | 79 20 77 72 69 74 74 65 |riginall|y writte|
|00002d70| 6e 20 69 6e 20 50 61 73 | 63 61 6c 2c 20 61 6e 64 |n in Pas|cal, and|
|00002d80| 20 63 6f 6d 70 69 6c 65 | 64 20 77 69 74 68 20 46 | compile|d with F|
|00002d90| 50 55 20 63 6f 64 65 0d | 3b 20 67 65 6e 65 72 61 |PU code.|; genera|
|00002da0| 74 69 6f 6e 20 74 75 72 | 6e 65 64 20 6f 6e 2e 20 |tion tur|ned on. |
|00002db0| 54 68 65 20 66 69 72 73 | 74 20 74 68 69 6e 67 20 |The firs|t thing |
|00002dc0| 77 65 20 64 69 64 20 74 | 6f 20 6d 61 6b 65 20 74 |we did t|o make t|
|00002dd0| 68 69 73 20 66 61 73 74 | 65 72 20 77 61 73 20 74 |his fast|er was t|
|00002de0| 6f 20 72 65 63 6f 64 65 | 0d 3b 20 69 74 20 69 6e |o recode|.; it in|
|00002df0| 74 6f 20 41 73 73 65 6d | 62 6c 79 2e 20 41 66 74 |to Assem|bly. Aft|
|00002e00| 65 72 20 74 68 61 74 20 | 77 65 20 64 69 64 20 61 |er that |we did a|
|00002e10| 6e 20 61 6e 61 6c 79 73 | 69 73 20 74 6f 20 6d 61 |n analys|is to ma|
|00002e20| 6b 65 20 73 75 72 65 20 | 74 68 61 74 20 74 68 69 |ke sure |that thi|
|00002e30| 73 20 63 6f 64 65 20 77 | 61 73 0d 3b 20 61 73 20 |s code w|as.; as |
|00002e40| 66 61 73 74 20 61 73 20 | 70 6f 73 73 69 62 6c 65 |fast as |possible|
|00002e50| 2c 20 74 61 6b 69 6e 67 | 20 69 6e 74 6f 20 61 63 |, taking| into ac|
|00002e60| 63 6f 75 6e 74 20 74 68 | 65 20 63 61 63 68 69 6e |count th|e cachin|
|00002e70| 67 20 63 61 70 61 62 69 | 6c 69 74 69 65 73 20 6f |g capabi|lities o|
|00002e80| 66 20 74 68 65 20 36 38 | 38 38 32 2e 0d 3b 20 66 |f the 68|882..; f|
|00002e90| 6f 6c 6c 6f 77 69 6e 67 | 20 69 73 20 72 65 73 75 |ollowing| is resu|
|00002ea0| 6c 74 73 20 6f 66 20 74 | 68 61 74 20 61 6e 61 6c |lts of t|hat anal|
|00002eb0| 79 73 69 73 2e 0d 3b 0d | 3b 20 54 68 69 73 20 61 |ysis..;.|; This a|
|00002ec0| 6e 61 6c 79 73 69 73 20 | 66 6f 6c 6c 6f 77 73 20 |nalysis |follows |
|00002ed0| 74 68 65 20 70 72 6f 63 | 65 64 75 72 65 20 6f 75 |the proc|edure ou|
|00002ee0| 74 6c 69 6e 65 64 20 69 | 6e 20 73 65 63 74 69 6f |tlined i|n sectio|
|00002ef0| 6e 20 38 2e 35 2e 31 2e | 33 20 6f 66 20 74 68 65 |n 8.5.1.|3 of the|
|00002f00| 20 4d 6f 74 6f 72 6f 6c | 61 0d 3b 20 4d 43 36 38 | Motorol|a.; MC68|
|00002f10| 38 38 31 2f 4d 43 36 38 | 38 38 32 20 46 6c 6f 61 |881/MC68|882 Floa|
|00002f20| 74 69 6e 67 20 50 6f 69 | 6e 74 20 43 6f 70 72 6f |ting Poi|nt Copro|
|00002f30| 63 65 73 73 6f 72 20 55 | 73 65 72 27 73 20 4d 61 |cessor U|ser's Ma|
|00002f40| 6e 75 61 6c 0d 3b 0d 0d | 09 09 09 09 09 09 20 20 |nual.;..|......  |
|00002f50| 36 38 38 38 31 09 09 20 | 20 36 38 38 38 32 09 09 |68881.. | 68882..|
|00002f60| 54 61 69 6c 09 4e 65 78 | 74 20 48 65 61 64 09 4f |Tail.Nex|t Head.O|
|00002f70| 76 65 72 6c 61 70 20 3a | 3d 20 4d 69 6e 28 54 61 |verlap :|= Min(Ta|
|00002f80| 69 6c 2c 20 4e 65 78 74 | 48 65 61 64 29 0d 09 09 |il, Next|Head)...|
|00002f90| 09 09 09 09 20 20 2d 2d | 2d 2d 2d 09 09 20 20 2d |....  --|---..  -|
|00002fa0| 2d 2d 2d 2d 09 09 2d 2d | 2d 2d 09 2d 2d 2d 2d 2d |----..--|--.-----|
|00002fb0| 2d 2d 2d 2d 09 2d 2d 2d | 2d 2d 2d 2d 0d 46 41 44 |----.---|----.FAD|
|00002fc0| 44 09 79 2c 79 09 09 09 | 09 09 35 31 09 09 35 36 |D.y,y...|..51..56|
|00002fd0| 2f 31 37 2f 33 35 09 20 | 33 35 09 09 09 31 37 09 |/17/35. |35...17.|
|00002fe0| 09 20 20 31 37 0d 46 4d | 55 4c 09 78 2c 79 09 09 |.  17.FM|UL.x,y..|
|00002ff0| 09 09 09 37 31 09 09 37 | 36 2f 31 37 2f 35 35 09 |...71..7|6/17/55.|
|00003000| 20 35 35 09 09 09 31 37 | 09 09 20 20 31 37 0d 46 | 55...17|..  17.F|
|00003010| 41 44 44 09 51 6f 2c 79 | 09 09 09 09 35 31 09 09 |ADD.Qo,y|....51..|
|00003020| 35 36 2f 31 37 2f 33 35 | 09 20 33 35 09 09 20 20 |56/17/35|. 35..  |
|00003030| 32 31 2b 31 37 09 09 20 | 20 33 35 0d 0d 46 4d 4f |21+17.. | 35..FMO|
|00003040| 56 45 2e 58 09 78 53 71 | 75 61 72 65 64 2c 78 09 |VE.X.xSq|uared,x.|
|00003050| 09 09 33 33 09 09 32 31 | 2f 32 31 2f 30 30 09 20 |..33..21|/21/00. |
|00003060| 2d 09 09 09 2d 09 09 20 | 20 2d 0d 46 53 55 42 09 |-...-.. | -.FSUB.|
|00003070| 79 53 71 75 61 72 65 64 | 2c 78 09 09 09 35 31 09 |ySquared|,x...51.|
|00003080| 09 35 36 2f 31 37 2f 33 | 35 09 20 33 35 09 09 09 |.56/17/3|5. 35...|
|00003090| 31 37 09 09 20 20 31 37 | 0d 46 41 44 44 09 50 6f |17..  17|.FADD.Po|
|000030a0| 2c 78 09 09 09 09 35 31 | 09 09 35 36 2f 31 37 2f |,x....51|..56/17/|
|000030b0| 33 35 09 20 33 35 09 09 | 20 20 32 31 2b 31 37 09 |35. 35..|  21+17.|
|000030c0| 09 20 20 33 35 0d 0d 46 | 4d 4f 56 45 2e 58 09 79 |.  35..F|MOVE.X.y|
|000030d0| 2c 79 53 71 75 61 72 65 | 64 09 09 09 33 33 09 09 |,ySquare|d...33..|
|000030e0| 32 31 2f 32 31 2f 30 30 | 09 20 2d 09 09 09 2d 09 |21/21/00|. -...-.|
|000030f0| 09 20 20 2d 0d 46 4d 55 | 4c 09 79 2c 79 53 71 75 |.  -.FMU|L.y,ySqu|
|00003100| 61 72 65 64 09 09 09 37 | 31 09 09 37 36 2f 31 37 |ared...7|1..76/17|
|00003110| 2f 35 35 09 20 35 35 09 | 09 20 20 32 31 2b 31 37 |/55. 55.|.  21+17|
|00003120| 09 09 20 20 33 38 0d 46 | 4d 4f 56 45 2e 58 09 78 |..  38.F|MOVE.X.x|
|00003130| 2c 78 53 71 75 61 72 65 | 64 09 09 09 33 33 09 09 |,xSquare|d...33..|
|00003140| 32 31 2f 32 31 2f 30 30 | 09 20 2d 09 09 09 2d 09 |21/21/00|. -...-.|
|00003150| 09 20 20 2d 0d 46 4d 55 | 4c 09 78 2c 78 53 71 75 |.  -.FMU|L.x,xSqu|
|00003160| 61 72 65 64 09 09 09 37 | 31 09 09 37 36 2f 31 37 |ared...7|1..76/17|
|00003170| 2f 35 35 09 20 35 35 09 | 09 20 20 32 31 2b 31 37 |/55. 55.|.  21+17|
|00003180| 09 09 20 20 33 38 0d 0d | 46 4d 4f 56 45 2e 58 09 |..  38..|FMOVE.X.|
|00003190| 79 53 71 75 61 72 65 64 | 2c 73 63 72 61 74 63 68 |ySquared|,scratch|
|000031a0| 09 33 33 09 09 32 31 2f | 32 31 2f 30 30 09 20 2d |.33..21/|21/00. -|
|000031b0| 09 09 09 2d 09 09 20 20 | 2d 0d 46 41 44 44 09 78 |...-..  |-.FADD.x|
|000031c0| 53 71 75 61 72 65 64 2c | 73 63 72 61 74 63 68 09 |Squared,|scratch.|
|000031d0| 35 31 09 09 35 36 2f 31 | 37 2f 33 35 09 20 33 35 |51..56/1|7/35. 35|
|000031e0| 09 09 09 31 37 09 09 20 | 20 31 37 0d 46 43 4d 50 |...17.. | 17.FCMP|
|000031f0| 09 72 61 64 69 75 73 2c | 73 63 72 61 74 63 68 09 |.radius,|scratch.|
|00003200| 09 33 33 09 09 33 38 2f | 31 37 2f 31 37 09 20 2d |.33..38/|17/17. -|
|00003210| 09 09 09 2d 09 09 20 20 | 2d 0d 09 09 09 09 09 09 |...-..  |-.......|
|00003220| 20 20 2d 2d 2d 2d 09 09 | 2d 2d 2d 2d 2d 2d 2d 2d |  ----..|--------|
|00003230| 09 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.-------|--------|
|00003240| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 09 09 09 |--------|----....|
|00003250| 09 09 09 20 20 20 36 33 | 33 09 09 36 33 30 09 09 |...   63|3..630..|
|00003260| 09 09 09 09 4f 76 65 72 | 6c 61 70 20 3d 20 32 31 |....Over|lap = 21|
|00003270| 34 0d 0d 4e 65 74 20 72 | 65 73 75 6c 74 73 3a 0d |4..Net r|esults:.|
|00003280| 36 38 38 38 31 09 09 09 | 3d 20 36 33 33 0d 36 38 |68881...|= 633.68|
|00003290| 38 38 32 20 3d 20 36 33 | 30 2d 32 31 34 09 3d 20 |882 = 63|0-214.= |
|000032a0| 34 31 36 0d 72 61 74 69 | 6f 20 3d 20 36 33 33 2f |416.rati|o = 633/|
|000032b0| 34 31 36 20 3d 20 31 2e | 35 32 0d 0d 3b 3b 3b 3b |416 = 1.|52..;;;;|
|000032c0| 3b 3b 3b 3b 3b 3b 3b 3b | 3b 3b 3b 3b 3b 3b 3b 3b |;;;;;;;;|;;;;;;;;|
|000032d0| 3b 3b 3b 3b 3b 3b 3b 3b | 3b 3b 3b 3b 3b 3b 3b 3b |;;;;;;;;|;;;;;;;;|
|000032e0| 3b 3b 3b 3b 3b 3b 3b 3b | 3b 3b 3b 3b 3b 3b 3b 3b |;;;;;;;;|;;;;;;;;|
|000032f0| 3b 3b 3b 3b 3b 3b 3b 3b | 3b 3b 3b 3b 3b 3b 3b 3b |;;;;;;;;|;;;;;;;;|
|00003300| 3b 3b 3b 3b 3b 3b 3b 3b | 3b 3b 3b 3b 3b 3b 3b 3b |;;;;;;;;|;;;;;;;;|
|00003310| 3b 3b 3b 3b 3b 0d 3b 0d | 3b 20 54 68 65 20 66 6f |;;;;;.;.|; The fo|
|00003320| 6c 6c 6f 77 69 6e 67 20 | 69 73 20 61 20 6c 69 74 |llowing |is a lit|
|00003330| 74 6c 65 20 63 68 61 72 | 74 20 74 68 61 74 20 73 |tle char|t that s|
|00003340| 68 6f 75 6c 64 20 67 69 | 76 65 20 79 6f 75 20 61 |hould gi|ve you a|
|00003350| 6e 20 69 64 65 61 20 77 | 68 61 74 20 68 61 70 70 |n idea w|hat happ|
|00003360| 65 6e 73 20 77 69 74 68 | 0d 3b 20 74 68 65 20 63 |ens with|.; the c|
|00003370| 6f 6e 63 75 72 72 65 6e | 63 79 20 66 65 61 74 75 |oncurren|cy featu|
|00003380| 72 65 20 6f 66 20 74 68 | 65 20 4d 43 36 38 38 38 |re of th|e MC6888|
|00003390| 32 2e 20 54 68 65 20 68 | 65 61 64 20 6f 66 20 74 |2. The h|ead of t|
|000033a0| 68 65 20 66 69 72 73 74 | 20 69 6e 73 74 72 75 63 |he first| instruc|
|000033b0| 74 69 6f 6e 20 69 73 0d | 3b 20 65 78 65 63 75 74 |tion is.|; execut|
|000033c0| 65 64 2e 20 57 68 65 6e | 20 74 68 61 74 20 69 73 |ed. When| that is|
|000033d0| 20 64 6f 6e 65 2c 20 69 | 74 20 70 72 6f 63 65 65 | done, i|t procee|
|000033e0| 64 73 20 74 6f 20 74 68 | 65 20 74 61 69 6c 20 6f |ds to th|e tail o|
|000033f0| 66 20 74 68 65 20 66 69 | 72 73 74 20 69 6e 73 74 |f the fi|rst inst|
|00003400| 72 75 63 74 69 6f 6e 2c | 0d 3b 20 61 6e 64 20 74 |ruction,|.; and t|
|00003410| 68 65 20 68 65 61 64 20 | 6f 66 20 74 68 65 20 73 |he head |of the s|
|00003420| 65 63 6f 6e 64 20 69 6e | 73 74 72 75 63 74 69 6f |econd in|structio|
|00003430| 6e 20 69 73 20 65 6e 74 | 65 72 65 64 2e 20 57 68 |n is ent|ered. Wh|
|00003440| 65 6e 20 62 6f 74 68 20 | 74 68 65 20 74 61 69 6c |en both |the tail|
|00003450| 20 6f 66 20 74 68 65 0d | 3b 20 66 69 72 73 74 20 | of the.|; first |
|00003460| 69 6e 73 74 72 75 63 74 | 69 6f 6e 20 61 6e 64 20 |instruct|ion and |
|00003470| 74 68 65 20 68 65 61 64 | 20 6f 66 20 74 68 65 20 |the head| of the |
|00003480| 73 65 63 6f 6e 64 20 69 | 6e 73 74 72 75 63 74 69 |second i|nstructi|
|00003490| 6f 6e 20 61 72 65 20 64 | 6f 6e 65 2c 20 77 65 20 |on are d|one, we |
|000034a0| 6d 6f 76 65 20 69 6e 74 | 6f 0d 3b 20 74 68 65 20 |move int|o.; the |
|000034b0| 74 61 69 6c 20 6f 66 20 | 74 68 65 20 73 65 63 6f |tail of |the seco|
|000034c0| 6e 64 20 69 6e 73 74 72 | 75 63 74 69 6f 6e 2c 20 |nd instr|uction, |
|000034d0| 61 6e 64 20 70 72 6f 63 | 65 65 64 20 74 6f 20 74 |and proc|eed to t|
|000034e0| 68 65 20 68 65 61 64 20 | 6f 66 20 74 68 65 20 74 |he head |of the t|
|000034f0| 68 69 72 64 0d 3b 20 69 | 6e 73 74 72 75 63 74 69 |hird.; i|nstructi|
|00003500| 6f 6e 2e 20 53 6f 6d 65 | 20 69 6e 73 74 72 75 63 |on. Some| instruc|
|00003510| 74 69 6f 6e 73 2c 20 6c | 69 6b 65 20 46 4d 4f 56 |tions, l|ike FMOV|
|00003520| 45 2c 20 68 61 76 65 20 | 6e 6f 20 74 61 69 6c 73 |E, have |no tails|
|00003530| 2c 20 61 6e 64 20 63 61 | 6e 20 65 78 65 63 75 74 |, and ca|n execut|
|00003540| 65 0d 3b 20 63 6f 6d 70 | 6c 65 74 65 6c 79 20 62 |e.; comp|letely b|
|00003550| 65 66 6f 72 65 20 74 68 | 65 20 74 61 69 6c 20 6f |efore th|e tail o|
|00003560| 66 20 74 68 65 20 70 72 | 65 76 69 6f 75 73 20 69 |f the pr|evious i|
|00003570| 6e 73 74 72 75 63 74 69 | 6f 6e 20 69 73 20 64 6f |nstructi|on is do|
|00003580| 6e 65 2c 20 61 6e 64 20 | 63 61 6e 20 70 72 6f 63 |ne, and |can proc|
|00003590| 65 65 64 0d 3b 20 74 6f | 20 74 68 65 20 68 65 61 |eed.; to| the hea|
|000035a0| 64 20 6f 66 20 74 68 65 | 20 69 6e 73 74 72 75 63 |d of the| instruc|
|000035b0| 74 69 6f 6e 20 74 68 61 | 74 20 63 6f 6d 65 73 20 |tion tha|t comes |
|000035c0| 61 66 74 65 72 20 69 74 | 2e 20 4e 6f 74 65 20 74 |after it|. Note t|
|000035d0| 68 61 74 20 61 6c 6c 20 | 6f 66 20 74 68 69 73 0d |hat all |of this.|
|000035e0| 3b 20 6f 63 63 75 72 73 | 20 6f 6e 6c 79 20 69 66 |; occurs| only if|
|000035f0| 20 74 68 65 72 65 20 69 | 73 20 6e 6f 20 72 65 67 | there i|s no reg|
|00003600| 69 73 74 65 72 20 63 6f | 6e 66 6c 69 63 74 2e 20 |ister co|nflict. |
|00003610| 53 65 65 20 74 68 65 20 | d2 4d 6f 74 6f 72 6f 6c |See the |.Motorol|
|00003620| 61 20 4d 43 36 38 38 38 | 31 2f 4d 43 36 38 38 38 |a MC6888|1/MC6888|
|00003630| 32 0d 3b 20 46 6c 6f 61 | 74 69 6e 67 20 50 6f 69 |2.; Floa|ting Poi|
|00003640| 6e 74 20 43 6f 70 72 6f | 63 65 73 73 6f 72 20 55 |nt Copro|cessor U|
|00003650| 73 65 72 27 73 20 4d 61 | 6e 75 61 6c d3 20 61 6e |ser's Ma|nual. an|
|00003660| 64 20 d2 4d 61 63 69 6e | 74 6f 73 68 20 54 65 63 |d .Macin|tosh Tec|
|00003670| 68 6e 6f 74 65 20 23 32 | 33 36 3a 20 53 70 65 65 |hnote #2|36: Spee|
|00003680| 64 79 0d 3b 20 74 68 65 | 20 4d 61 74 68 20 43 6f |dy.; the| Math Co|
|00003690| 70 72 6f 63 65 73 73 6f | 72 d3 20 66 6f 72 20 6d |processo|r. for m|
|000036a0| 6f 72 65 20 69 6e 66 6f | 72 6d 61 74 69 6f 6e 2e |ore info|rmation.|
|000036b0| 0d 3b 0d 3b 3b 3b 3b 3b | 3b 3b 3b 3b 3b 3b 3b 3b |.;.;;;;;|;;;;;;;;|
|000036c0| 3b 3b 3b 3b 3b 3b 3b 3b | 3b 3b 3b 3b 3b 3b 3b 3b |;;;;;;;;|;;;;;;;;|
|000036d0| 3b 3b 3b 3b 3b 3b 3b 3b | 3b 3b 3b 3b 3b 3b 3b 3b |;;;;;;;;|;;;;;;;;|
|000036e0| 3b 3b 3b 3b 3b 3b 3b 3b | 3b 3b 3b 3b 3b 3b 3b 3b |;;;;;;;;|;;;;;;;;|
|000036f0| 3b 3b 3b 3b 3b 3b 3b 3b | 3b 3b 3b 3b 3b 3b 3b 3b |;;;;;;;;|;;;;;;;;|
|00003700| 3b 3b 3b 3b 3b 3b 3b 3b | 3b 3b 3b 3b 0d 0d 46 41 |;;;;;;;;|;;;;..FA|
|00003710| 44 44 09 2b 20 31 37 20 | 2d 2b 2d 2d 2d 2d 20 33 |DD.+ 17 |-+---- 3|
|00003720| 35 20 2d 2d 2d 2d 2b 0d | 46 4d 55 4c 09 09 20 20 |5 ----+.|FMUL..  |
|00003730| 2b 20 31 37 20 2d 2b 09 | 20 20 20 2b 2d 2d 2d 2d |+ 17 -+.|   +----|
|00003740| 2d 2d 2d 20 35 35 20 2d | 2d 2d 2d 2d 2d 2d 2b 0d |--- 55 -|------+.|
|00003750| 46 41 44 44 09 09 09 09 | 09 20 20 20 2b 20 31 37 |FADD....|.   + 17|
|00003760| 20 2d 2b 09 09 09 20 20 | 2b 2d 2d 2d 2d 20 33 35 | -+...  |+---- 35|
|00003770| 20 2d 2d 2d 2d 2b 0d 46 | 4d 4f 56 45 09 09 09 09 | ----+.F|MOVE....|
|00003780| 09 09 09 09 09 09 20 20 | 2b 2d 20 32 31 20 2d 2d |......  |+- 21 --|
|00003790| 2b 0d 46 53 55 42 09 09 | 09 09 09 09 09 09 09 09 |+.FSUB..|........|
|000037a0| 09 20 20 20 20 20 20 2b | 20 31 37 20 2d 2b 2d 2d |.      +| 17 -+--|
|000037b0| 2d 2d 20 33 35 20 2d 2d | 2d 2d 2b 0d 46 41 44 44 |-- 35 --|--+.FADD|
|000037c0| 09 09 09 09 09 09 09 09 | 09 09 09 09 09 09 2b 20 |........|......+ |
|000037d0| 31 37 20 2d 2b 09 09 20 | 2b 2d 2d 2d 2d 20 33 35 |17 -+.. |+---- 35|
|000037e0| 20 2d 2d 2d 2d 2b 0d 46 | 4d 4f 56 45 09 09 09 09 | ----+.F|MOVE....|
|000037f0| 09 09 09 09 09 09 09 09 | 09 09 09 09 09 20 2b 2d |........|..... +-|
|00003800| 20 32 31 20 2d 2d 2b 0d | 46 4d 55 4c 09 09 09 09 | 21 --+.|FMUL....|
|00003810| 09 09 09 09 09 09 09 09 | 09 09 09 09 09 09 09 20 |........|....... |
|00003820| 2b 20 31 37 20 2d 2b 2d | 2d 2d 2d 2d 2d 2d 20 35 |+ 17 -+-|------ 5|
|00003830| 35 20 2d 2d 2d 2d 2d 2d | 2d 2b 0d 46 4d 4f 56 45 |5 ------|-+.FMOVE|
|00003840| 09 09 09 09 09 09 09 09 | 09 09 09 09 09 09 09 09 |........|........|
|00003850| 09 09 09 09 20 20 20 2b | 2d 20 32 31 20 2d 2d 2b |....   +|- 21 --+|
|00003860| 0d 46 4d 55 4c 09 09 09 | 09 09 09 09 09 09 09 09 |.FMUL...|........|
|00003870| 09 09 09 09 09 09 09 09 | 09 09 09 20 20 20 2b 20 |........|...   + |
|00003880| 31 37 20 2d 2b 09 20 20 | 2b 2d 2d 2d 2d 2d 2d 2d |17 -+.  |+-------|
|00003890| 20 35 35 20 2d 2d 2d 2d | 2d 2d 2d 2b 0d 46 4d 4f | 55 ----|---+.FMO|
|000038a0| 56 45 09 09 09 09 09 09 | 09 09 09 09 09 09 09 09 |VE......|........|
|000038b0| 09 09 09 09 09 09 09 09 | 09 09 09 20 20 2b 2d 20 |........|...  +- |
|000038c0| 32 31 20 2d 2d 2b 0d 46 | 41 44 44 09 09 09 09 09 |21 --+.F|ADD.....|
|000038d0| 09 09 09 09 09 09 09 09 | 09 09 09 09 09 09 09 09 |........|........|
|000038e0| 09 09 09 09 09 09 20 20 | 2b 20 31 37 20 2d 2b 09 |......  |+ 17 -+.|
|000038f0| 20 2b 2d 2d 2d 2d 20 33 | 35 20 2d 2d 2d 2d 2b 0d | +---- 3|5 ----+.|
|00003900| 46 43 4d 50 09 09 09 09 | 09 09 09 09 09 09 09 09 |FCMP....|........|
|00003910| 09 09 09 09 09 09 09 09 | 09 09 09 09 09 09 09 09 |........|........|
|00003920| 09 09 20 2b 20 31 37 20 | 2d 2b 09 20 20 2b 20 31 |.. + 17 |-+.  + 1|
|00003930| 37 20 2d 2b 0d 00 00 00 | 00 00 00 00 00 00 00 00 |7 -+....|........|
|00003940| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003950| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003960| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003970| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003980| 00 00 01 00 00 00 01 e8 | 00 00 00 e8 00 00 00 4a |........|.......J|
|00003990| 20 6e 00 08 2f 28 00 08 | 4e ad 09 ca 2f 3c 00 00 | n../(..|N.../<..|
|000039a0| ff ff 20 6e 00 08 2f 28 | 00 08 4e ba 0a 02 70 ff |.. n../(|..N...p.|
|000039b0| 0a 47 6f 46 69 67 67 65 | 72 2e 61 67 02 00 00 00 |.GoFigge|r.ag....|
|000039c0| 54 45 58 54 4d 50 53 20 | 01 00 00 3c 00 c0 00 00 |TEXTMPS |...<....|
|000039d0| 00 00 54 45 58 54 4d 50 | 53 20 01 00 00 3c 00 c0 |..TEXTMP|S ...<..|
|000039e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000039f0| 00 00 a2 64 55 be 00 00 | 00 00 00 00 02 32 3f 07 |...dU...|.....2?.|
|00003a00| 20 6e 00 08 2f 28 00 08 | 4e ad 0a f2 60 52 3f 3c | n../(..|N...`R?<|
|00003a10| 00 28 48 6d 9d 40 48 6e | ff e4 3f 07 20 6e 00 08 |.(Hm.@Hn|..?. n..|
|00003a20| 2f 28 00 08 4e ad 0a f2 | 60 36 3f 3c 00 23 48 6d |/(..N...|`6?<.#Hm|
|00003a30| 9d 40 48 6e ff e4 3f 07 | 20 6e 00 08 2f 28 00 08 |.@Hn..?.| n../(..|
|00003a40| 4e ad 0a f2 60 1a 3f 3c | 00 20 48 6d 9d 40 48 6e |N...`.?<|. Hm.@Hn|
|00003a50| ff e4 3f 07 20 6e 00 08 | 2f 28 00 08 4e ad 0a f2 |..?. n..|/(..N...|
|00003a60| 41 ed 9d 40 43 ee ff e4 | 20 d9 20 d9 20 d9 30 91 |A..@C...| . . .0.|
|00003a70| 60 00 09 1e 42 67 20 6e | 00 08 2f 28 00 08 4e ad |`...Bg n|../(..N.|
|00003a80| 00 00 00 1e 00 2a 00 05 | 01 d3 02 73 00 2a 00 05 |.....*..|...s.*..|
|00003a90| 01 d3 02 73 00 00 00 00 | 00 00 00 00 00 00 00 00 |...s....|........|
|00003aa0| 00 00 00 00 00 48 00 09 | 4d 6f 6e 61 63 6f 00 48 |.....H..|Monaco.H|
|00003ab0| 65 72 65 0d 09 09 09 09 | 46 4d 4f 56 45 20 20 20 |ere.....|FMOVE   |
|00003ac0| 20 20 20 46 50 33 2c 46 | 00 06 00 04 00 2a 00 05 |   FP3,F|.....*..|
|00003ad0| 01 d3 02 5d 00 2a 00 05 | 01 d3 02 5d a2 3b 9d c0 |...].*..|...].;..|
|00003ae0| 00 00 00 00 00 00 00 00 | 00 00 00 00 01 00 00 00 |........|........|
|00003af0| 00 76 00 05 00 00 09 1b | 00 00 09 29 0f 49 4e 53 |.v......|...).INS|
|00003b00| 54 49 4d 45 4e 4f 44 52 | 49 46 54 00 00 00 14 25 |TIMENODR|IFT....%|
|00003b10| 00 00 14 30 0b 49 4e 49 | 54 43 4f 55 4e 54 45 52 |...0.INI|TCOUNTER|
|00003b20| 00 00 14 9f 00 00 14 a9 | 0b 54 69 6d 65 52 65 63 |........|.TimeRec|
|00003b30| 6f 72 64 00 00 00 1d f4 | 00 00 1e 0b 17 54 46 52 |ord.....|.....TFR|
|00003b40| 41 43 41 50 50 45 4e 47 | 49 4e 45 5f 47 4f 46 49 |ACAPPENG|INE_GOFI|
|00003b50| 47 47 45 52 00 00 1e 19 | 00 00 1e 23 0b 53 74 61 |GGER....|...#.Sta|
|00003b60| 63 6b 46 72 61 6d 65 00 | 00 00 01 00 00 00 01 e8 |ckFrame.|........|
|00003b70| 00 00 00 e8 00 00 00 4a | 00 34 5b 34 08 d2 00 00 |.......J|.4[4....|
|00003b80| 00 1c 00 4a 00 00 4d 50 | 53 52 00 02 00 0a 03 f0 |...J..MP|SR......|
|00003b90| ff ff 00 00 00 00 00 00 | 00 00 03 ed ff ff 00 00 |........|........|
|00003ba0| 00 22 00 00 00 00 03 ef | ff ff 00 00 00 6e 00 35 |."......|.....n.5|
|00003bb0| ff a0 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003bc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003bd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003be0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003bf0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+